collapseos/blk/269

4 lines
58 B
Plaintext

( b1 b2 -- )
: XPACKR 1+ SWAP DO I DUP . NL XPACK LOOP ;