OSDN Git Service

Fix bug in `<<{}` function.
[joypy/Thun.git] / joy / defs.txt
index 5a40424..4945b66 100644 (file)
@@ -5,7 +5,7 @@
 || nulco [nullary] dip [true] branch
 !- 0 >=
 <{} [] swap
-<<{} [] rolldown
+<<{} [] rollup
 abs dup 0 < [] [neg] branch
 anamorphism [pop []] swap [dip swons] genrec
 app1 grba infrst