aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/lux.lux9
1 files changed, 5 insertions, 4 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index bcf620c8f..737c38fd3 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -688,16 +688,17 @@
default-def-meta-exported))
## Base functions & macros
-(_lux_def _cursor
+(_lux_def dummy-cursor
(_lux_: Cursor ["" +0 +0])
- #Nil)
+ (#Cons [["lux" "export?"] (#BoolA true)]
+ #Nil))
(_lux_def _meta
(_lux_: (#Function (#App Code'
(#App Meta Cursor))
Code)
(_lux_function _ data
- [_cursor data]))
+ [dummy-cursor data]))
#Nil)
(_lux_def return
@@ -3312,7 +3313,7 @@
(default 20 #;None) => 20"}
(case tokens
(^ (list else maybe))
- (let [g!temp (: Code [_cursor (#;Symbol ["" ""])])
+ (let [g!temp (: Code [dummy-cursor (#;Symbol ["" ""])])
code (` (case (~ maybe)
(#;Some (~ g!temp))
(~ g!temp)