S
Size: a a a
S
S
E
☔
OO
{ 2 $| drop 1 $| nip $>B 8 B>u@ dup 57 <= swap 48 >= and } : is-digit-opt?
☔
E
E
{ 2 $| drop 1 $| nip $>B 8 B>u@ dup 57 <= swap 48 >= and } : is-digit-opt?
OO
LIST(
[([xchg 0 1] [xchg 0 2]) ([rot])]
[([xchg 0 1] [xchg 1 2]) ([-rot])]
[([xchg 0 2] [xchg 1 2]) ([rot])]
[([xchg 0 2] [xchg 0 1]) ([-rot])]
[([xchg 1 2] [xchg 0 1]) ([rot])]
[([xchg 1 2] [xchg 0 2]) ([-rot])]
[([xchg 0 1] [rot]) ([xchg 0 2])]
[([-rot] [xchg 0 1]) ([xchg 0 2])]
[([xchg 0 2] [xchg 1 3]) ([2swap])]
[([xchg 1 3] [xchg 0 2]) ([2swap])]
[([push 1] [push 1]) ([2dup])]
[([push 3] [push 3]) ([2over])]
[([pop 0] [pop 0]) ([2drop])]
[([pop 1] [pop 0]) ([2drop])]
[([xchg 0 1] [push 1]) ([tuck])]
[([rot] [-rot]) ()]
[([-rot] [rot]) ()]
) constant
OO
E
E
E
{ 2 $| drop 1 $| nip $>B 8 B>u@ dup 57 <= swap 48 >= and } : is-digit-opt?
☔
OO
OO
☔
E
E
OO