NOP does nothing but stacking

This commit is contained in:
ceriel 1991-08-30 15:48:10 +00:00
parent d4045b68d4
commit dc2ab49b32
3 changed files with 14 additions and 4 deletions

View file

@ -2151,9 +2151,11 @@ lpb | | | | adp 2 |
mon | R16 | mon | R16 |
"jsr Mon" "jsr Mon"
| %[1] | | | %[1] | |
nop | | nop | STACK |
#ifdef DEBUG
allocate(R16) allocate(R16)
"jsr Printstack" "jsr Printstack"
#endif
| | | | | |
rck | R16 | | | | rck | R16 | | | |
rtt | | rtt | |

View file

@ -1357,8 +1357,12 @@ lni | | allocate(HL_REG)
"inc (hl)" "inc (hl)"
erase(HL) | | | erase(HL) | | |
lpb | | | | adp 4 | lpb | | | | adp 4 |
nop | | allocate(ALL_REG) nop | STACK |
"call .nop" | | | #ifdef DEBUG
allocate(ALL_REG)
"call .nop"
#endif
| | |
rck $1 == 2 | STACK | allocate(ALL_REG) rck $1 == 2 | STACK | allocate(ALL_REG)
"call .rck" "call .rck"
| | | | | |

View file

@ -1708,7 +1708,11 @@ lin | | "ld hol0, $$$1" samecc | | |
lni | | "inc hol0" | | | lni | | "inc hol0" | | |
lpb | | | | adp SL | lpb | | | | adp SL |
mon | STACK | "calr mon" | | | mon | STACK | "calr mon" | | |
nop | STACK | "calr noop" | | | nop | STACK |
#ifdef DEBUG
"calr noop"
#ENDIF
| | |
rtt | | | | ret 0 | rtt | | | | ret 0 |
sig | REG | allocate(REG) sig | REG | allocate(REG)
move( {da2, "trppc"}, %[a] ) move( {da2, "trppc"}, %[a] )