Added tail call optimization
This commit is contained in:
parent
b00cb182d9
commit
a26778744a
3 changed files with 4 additions and 6 deletions
|
@ -12,7 +12,6 @@
|
||||||
|
|
||||||
.proc _beep: near
|
.proc _beep: near
|
||||||
|
|
||||||
jsr BEEP ; Beep
|
jmp BEEP ; Beep
|
||||||
rts
|
|
||||||
|
|
||||||
.endproc
|
.endproc
|
||||||
|
|
|
@ -53,5 +53,5 @@ _exit: jsr donelib ; Run destructors
|
||||||
lda TECHO
|
lda TECHO
|
||||||
ora #$80 ; Re-enable console echo
|
ora #$80 ; Re-enable console echo
|
||||||
sta TECHO
|
sta TECHO
|
||||||
jsr NACCES ; Lock System RAM
|
jmp NACCES ; Lock System RAM
|
||||||
rts ; Re-enter Sym-1 monitor
|
; Re-enter Sym-1 monitor
|
||||||
|
|
|
@ -12,7 +12,6 @@
|
||||||
|
|
||||||
.proc _fdisp: near
|
.proc _fdisp: near
|
||||||
|
|
||||||
jsr SCAND ; Flash Display
|
jmp SCAND ; Flash Display
|
||||||
rts
|
|
||||||
|
|
||||||
.endproc
|
.endproc
|
||||||
|
|
Loading…
Add table
Reference in a new issue