aboutsummaryrefslogtreecommitdiff
path: root/lux-r
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lux-r/source/program.lux4
-rw-r--r--lux-ruby/source/program.lux1
2 files changed, 2 insertions, 3 deletions
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux
index 2ba9794ad..9706cc307 100644
--- a/lux-r/source/program.lux
+++ b/lux-r/source/program.lux
@@ -6,7 +6,7 @@
[abstract
["[0]" monad {"+" do}]]
[control
- [pipe {"+" exec> case> new>}]
+ ["[0]" pipe]
["[0]" maybe]
["[0]" try {"+" Try}]
["[0]" exception {"+" exception:}]
@@ -183,7 +183,7 @@
... (def: host_bit
... (-> Bit org/armedbear/lisp/LispObject)
-... (|>> (case> #0 (org/armedbear/lisp/Nil::NIL)
+... (|>> (pipe.case #0 (org/armedbear/lisp/Nil::NIL)
... #1 (org/armedbear/lisp/Symbol::T))))
(syntax: (%%code [term <code>.any])
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux
index 1d47453aa..026032a4b 100644
--- a/lux-ruby/source/program.lux
+++ b/lux-ruby/source/program.lux
@@ -8,7 +8,6 @@
[abstract
["[0]" monad {"+" do}]]
[control
- [pipe {"+" new>}]
["[0]" maybe]
["[0]" try {"+" Try}]
["[0]" exception {"+" exception:}]