diff options
Diffstat (limited to '')
-rw-r--r-- | lux-r/source/program.lux | 7 | ||||
-rw-r--r-- | lux-ruby/source/program.lux | 1 |
2 files changed, 4 insertions, 4 deletions
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux index 2f4fab588..1a61a8545 100644 --- a/lux-r/source/program.lux +++ b/lux-r/source/program.lux @@ -23,7 +23,7 @@ [collection ["[0]" array (.only Array)]]] ["[0]" macro - [syntax (.only syntax:)] + [syntax (.only syntax)] ["[0]" template] ["[0]" code]] [math @@ -186,8 +186,9 @@ ... (|>> (pipe.case #0 (org/armedbear/lisp/Nil::NIL) ... #1 (org/armedbear/lisp/Symbol::T)))) -(syntax: (%%code [term <code>.any]) - (wrap (list (code.text (%.code term))))) +(def: %%code + (syntax (_ [term <code>.any]) + (wrap (list (code.text (%.code term)))))) (def: (host_value value) (-> Any org/renjin/sexp/SEXP) diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index ca2a3247b..16fb31a96 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -26,7 +26,6 @@ ["[0]" array (.only Array)] ["[0]" list (.open: "[1]#[0]" functor)]]] ["[0]" macro - [syntax (.only syntax:)] ["^" pattern] ["[0]" template]] [math |