Build defs.pl from defs.txt.
This commit is contained in:
@@ -7,7 +7,6 @@ app2 == [grba swap grba swap] dip [infrst] cons ii
|
||||
app3 == 3 appN
|
||||
appN == [grabN] cons dip map disenstacken
|
||||
at == drop first
|
||||
average == [sum 1.0 *] [size] cleave /
|
||||
b == [i] dip i
|
||||
binary == unary popd
|
||||
ccons == cons cons
|
||||
@@ -58,7 +57,7 @@ shunt == [swons] step
|
||||
size == 0 swap [pop ++] step
|
||||
split_at == [drop] [take] clop
|
||||
sqr == dup *
|
||||
step_zero == 0 roll> step
|
||||
step_zero == 0 rollup step
|
||||
sum == 0 swap [+] step
|
||||
swons == swap cons
|
||||
take == [] rolldown [shift] times pop
|
||||
@@ -69,4 +68,4 @@ unit == [] cons
|
||||
unquoted == [i] dip
|
||||
unswons == uncons swap
|
||||
while == swap [nullary] cons dup dipd concat loop
|
||||
x == dup i
|
||||
x == dup i
|
||||
|
||||
Reference in New Issue
Block a user