collapseos/blk/309
2020-04-22 21:19:12 -04:00

12 lines
176 B
Plaintext

( a b -- a b a )
CODE OVER
HL POPqq, ( B )
DE POPqq, ( A )
chkPS,
DE PUSHqq, ( A )
HL PUSHqq, ( B )
DE PUSHqq, ( A )
;CODE