Need to keep definition for ucons around

the Nim implementation has first and rest but not uncons.
This commit is contained in:
Simon Forman 2022-04-05 11:15:34 -07:00
parent 9fe565a929
commit d0a253c503
2 changed files with 4 additions and 2 deletions

View File

@ -18,7 +18,7 @@ b [i] dip i
binary unary popd
ccccons ccons ccons
ccons cons cons
clear stack bool [pop stack bool] loop
clear [] swaack pop
cleave fork popdd
clop cleave popdd
codi cons dip
@ -33,6 +33,7 @@ dupdd [dup] dipd
dupdip dupd dip
dupdipd dup dipd
enstacken stack [clear] dip
first uncons pop
flatten <{} [concat] step
fork [i] app2
fourth rest third
@ -65,7 +66,7 @@ quoted [unit] dip
range [0 <=] [1 - dup] anamorphism
range_to_zero unit [down_to_zero] infra
reco rest cons
rest [pop] infra
rest uncons popd
reverse <{} shunt
roll> swap swapd
roll< swapd swap

View File

@ -96,6 +96,7 @@ ternary binary popd
third rest second
tuck dup swapd
unary nullary popd
uncons [first] [rest] cleave
unit [] cons
unquoted [i] dip
unswons uncons swap