Virgil Dupras
3 anni fa
2 ha cambiato i file con 6 aggiunte e 9 eliminazioni
+ 4
- 4
blk/283
Vedi 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, ( unused ) 0 JP, ( 14, popRS ) | |||||
| NOP, NOP, NOP, NOP, NOP, NOP, ( unused ) | |||||
| 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 ) | |||||
| NOP, NOP, NOP, NOP, ( unused ) | |||||
| 0 JP, ( RST 20 ) | |||||
| 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 ) | ||||
+ 2
- 5
blk/284
Vedi 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, | |||||
| 0 A,, ( prev ) | |||||
| 4 A, | |||||
| H@ XCURRENT ! ( set current tip of dict, 0x42 ) | |||||
| 0 A, ( native ) | |||||
| H@ 4 + XCURRENT ! ( make next CODE have 0 prev field ) | |||||
| CODE EXIT ( 0x42 ) | |||||
| 0x14 BCALL, ( popRS ) | 0x14 BCALL, ( popRS ) | ||||
| HL PUSH, IY POP, ( --> IP ) | HL PUSH, IY POP, ( --> IP ) | ||||
| JPNEXT, | JPNEXT, | ||||