diff options
| author | Eduardo Julian | 2022-06-11 00:10:52 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2022-06-11 00:10:52 -0400 |
| commit | 5b36c00da8a21c5d70adec4b50ef573e12dc5cf8 (patch) | |
| tree | a1549d05cce57d20745c0835ea2419858fc30a4e /lux-r/source/program.lux | |
| parent | f21ca0dc1956a47b8f7ac6e0ea67d7d246c55280 (diff) | |
De-sigil-ification: : [Part 2]
Diffstat (limited to 'lux-r/source/program.lux')
| -rw-r--r-- | lux-r/source/program.lux | 7 |
1 files changed, 4 insertions, 3 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) |