1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-10 02:48:05 +11:00
collapseos/blk/309

10 lines
174 B
Plaintext
Raw Normal View History

2020-04-23 11:19:12 +10:00
( a b -- a b a )
CODE OVER
HL POPqq, ( B )
DE POPqq, ( A )
chkPS,
DE PUSHqq, ( A )
HL PUSHqq, ( B )
DE PUSHqq, ( A )
;CODE