1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-06 01:40:56 +11:00
collapseos/blk/305
Virgil Dupras 3ea221d0eb z80: inline all uses of pushRS/popRS
I'm trying to move stuff around and it simplifies things. Will make
a lot more sense to inline when BC replaces IY.
2020-07-05 21:54:01 -04:00

14 lines
248 B
Plaintext

( Native words )
CODE EXECUTE
DE POP,
chkPS,
JR, lblexec BWR ( execute-B301 )
CODE EXIT
PC ORG @ 0x0d + ! ( stable ABI JP )
L 0 IX+ LDrIXY,
H 1 IX+ LDrIXY,
IX DECd, IX DECd,
HL PUSH, IY POP, ( --> IP )
JPNEXT,