mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-01 13:30:54 +11:00
z80: move back R* words to native words section
This allows us to refer to pushRS/popRS routines by labels, allowing us to get rid of the pushRS reference in the stable ABI zone.
This commit is contained in:
parent
650481f849
commit
b626944273
4
blk/282
4
blk/282
@ -1,2 +1,2 @@
|
|||||||
VARIABLE lblofl VARIABLE lblpushRS VARIABLE lblexec
|
VARIABLE lblofl VARIABLE lblpushRS VARIABLE lblpopRS
|
||||||
VARIABLE lblfind
|
VARIABLE lblexec VARIABLE lblfind
|
||||||
|
2
blk/283
2
blk/283
@ -2,7 +2,7 @@ H@ ORG !
|
|||||||
0 JP, ( 00, main ) NOP, ( unused ) NOP, NOP, ( 04, BOOT )
|
0 JP, ( 00, main ) NOP, ( unused ) NOP, NOP, ( 04, BOOT )
|
||||||
NOP, NOP, ( 06, uflw ) NOP, NOP, ( 08, LATEST )
|
NOP, NOP, ( 06, uflw ) NOP, NOP, ( 08, LATEST )
|
||||||
NOP, NOP, NOP, NOP, NOP, NOP, NOP, ( 0a, unused )
|
NOP, NOP, NOP, NOP, NOP, NOP, NOP, ( 0a, unused )
|
||||||
0 JP, ( 11, pushRS ) 0 JP, ( 14, popRS )
|
NOP, NOP, NOP, ( unused ) 0 JP, ( 14, popRS )
|
||||||
NOP, NOP, NOP, ( unused )
|
NOP, NOP, NOP, ( unused )
|
||||||
0 JP, ( 1a, next ) NOP, NOP, NOP, ( unused )
|
0 JP, ( 1a, next ) NOP, NOP, NOP, ( unused )
|
||||||
NOP, NOP, NOP, NOP, ( unused )
|
NOP, NOP, NOP, NOP, ( unused )
|
||||||
|
15
blk/288
15
blk/288
@ -1,15 +0,0 @@
|
|||||||
CODE >R
|
|
||||||
HL POP, 17 BCALL, ( 17 == pushRS )
|
|
||||||
;CODE
|
|
||||||
CODE R>
|
|
||||||
20 BCALL, ( 20 == popRS ) HL PUSH,
|
|
||||||
;CODE
|
|
||||||
CODE 2>R ( 0xa9 )
|
|
||||||
PC ORG @ 0x35 + ! ( stable ABI JP )
|
|
||||||
DE POP, HL POP,
|
|
||||||
17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
|
|
||||||
;CODE NOP, NOP, NOP,
|
|
||||||
CODE 2R>
|
|
||||||
20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,
|
|
||||||
HL PUSH, DE PUSH,
|
|
||||||
;CODE
|
|
4
blk/297
4
blk/297
@ -1,10 +1,10 @@
|
|||||||
lblpushRS BSET PC ORG @ 0x12 + ! ( pushRS )
|
lblpushRS BSET
|
||||||
IX INCd, IX INCd,
|
IX INCd, IX INCd,
|
||||||
0 IX+ L LDIXYr,
|
0 IX+ L LDIXYr,
|
||||||
1 IX+ H LDIXYr,
|
1 IX+ H LDIXYr,
|
||||||
RET,
|
RET,
|
||||||
|
|
||||||
PC ORG @ 0x15 + ! ( popRS )
|
lblpopRS BSET PC ORG @ 0x15 + ! ( popRS )
|
||||||
L 0 IX+ LDrIXY,
|
L 0 IX+ LDrIXY,
|
||||||
H 1 IX+ LDrIXY,
|
H 1 IX+ LDrIXY,
|
||||||
IX DECd, IX DECd,
|
IX DECd, IX DECd,
|
||||||
|
15
blk/326
Normal file
15
blk/326
Normal file
@ -0,0 +1,15 @@
|
|||||||
|
CODE >R
|
||||||
|
HL POP, lblpushRS @ CALL,
|
||||||
|
;CODE
|
||||||
|
CODE R>
|
||||||
|
lblpopRS @ CALL, HL PUSH,
|
||||||
|
;CODE
|
||||||
|
CODE 2>R
|
||||||
|
PC ORG @ 0x35 + ! ( stable ABI JP )
|
||||||
|
DE POP, HL POP,
|
||||||
|
lblpushRS @ CALL, EXDEHL, lblpushRS @ CALL,
|
||||||
|
;CODE
|
||||||
|
CODE 2R>
|
||||||
|
lblpopRS @ CALL, EXDEHL, lblpopRS @ CALL,
|
||||||
|
HL PUSH, DE PUSH,
|
||||||
|
;CODE
|
Loading…
Reference in New Issue
Block a user