z80: prettify

This commit is contained in:
Virgil Dupras 2020-07-05 13:15:26 -04:00
parent 4a91ee5c9c
commit 84202da6a6
2 changed files with 6 additions and 9 deletions

View File

@ -1,12 +1,12 @@
H@ ORG ! 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, ( unused )
NOP, NOP, NOP, ( unused ) 0 JP, ( 14, popRS ) 0 JP, ( RST 10 ) 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 ) 0 JP, ( RST 20 )
NOP, NOP, NOP, NOP, ( unused ) NOP, NOP, NOP, NOP, NOP, ( unused )
0 JP, ( RST 28 ) 0 JP, ( RST 28 )
0 A, 0 JP, ( 2b, (s) ) NOP, ( unused ) 0 A, 0 JP, ( 2b, (s) ) NOP, ( unused )
0 JP, ( RST 30 ) 0 JP, ( RST 30 )

View File

@ -1,11 +1,8 @@
( BOOT DICT: There are only 3 words in the boot dict, but ( BOOT DICT: There are only 3 words in the boot dict, but
these words' offset need to be stable, so they're part of these words' offset need to be stable, so they're part of
the "stable ABI" ) the "stable ABI" )
'E' A, 'X' A, 'I' A, 'T' A, H@ 4 + XCURRENT ! ( make next CODE have 0 prev field )
0 A,, ( prev ) CODE EXIT ( 0x42 )
4 A,
H@ XCURRENT ! ( set current tip of dict, 0x42 )
0 A, ( native )
0x14 BCALL, ( popRS ) 0x14 BCALL, ( popRS )
HL PUSH, IY POP, ( --> IP ) HL PUSH, IY POP, ( --> IP )
JPNEXT, JPNEXT,