Преглед на файлове

z80: inline cellWord in stable ABI

pull/119/head
Virgil Dupras преди 4 години
родител
ревизия
38d5a9f303
променени са 3 файла, в които са добавени 2 реда и са изтрити 18 реда
  1. +2
    -2
      blk/283
  2. +0
    -16
      blk/303
  3. Двоични данни
      emul/forth.bin

+ 2
- 2
blk/283 Целия файл

@@ -1,7 +1,8 @@
H@ ORG !
0 JPnn, ( 00, main ) 0 JPnn, ( 03, find )
NOP, NOP, ( 06, unused ) NOP, NOP, ( 08, LATEST )
NOP, ( 0a, unused ) 0 JPnn, ( 0b, cellWord )
NOP, ( 0a, unused )
( 0b cellWord, push PFA ) DE PUSHqq, JR, 0x0c A, ( next )
0 JPnn, ( 0e, compiledWord ) 0 JPnn, ( 11, pushRS )
0 JPnn, ( 14, popRS )
EXDEHL, JP(HL), NOP, ( 17, nativeWord )
@@ -13,4 +14,3 @@ NOP, NOP, ( 24, addrWord ) NOP, NOP, ( 26, unused )
0 JPnn, ( RST 30 )
0 JPnn, ( 33, execute ) NOP, NOP, ( unused )
0 JPnn, ( RST 38 )


+ 0
- 16
blk/303 Целия файл

@@ -1,16 +0,0 @@
PC ORG @ 0x0c + ! ( cellWord )
( Pushes PFA directly )
DE PUSHqq,
JPNEXT,













Двоични данни
emul/forth.bin Целия файл


Loading…
Отказ
Запис