From a26778744a3cefee87bda8405eff586edac50b2c Mon Sep 17 00:00:00 2001 From: polluks Date: Wed, 2 Feb 2022 23:02:01 +0100 Subject: [PATCH] Added tail call optimization --- libsrc/sym1/beep.s | 3 +-- libsrc/sym1/crt0.s | 4 ++-- libsrc/sym1/display.s | 3 +-- 3 files changed, 4 insertions(+), 6 deletions(-) diff --git a/libsrc/sym1/beep.s b/libsrc/sym1/beep.s index 40a3d42c6..edb5f23e4 100644 --- a/libsrc/sym1/beep.s +++ b/libsrc/sym1/beep.s @@ -12,7 +12,6 @@ .proc _beep: near - jsr BEEP ; Beep - rts + jmp BEEP ; Beep .endproc diff --git a/libsrc/sym1/crt0.s b/libsrc/sym1/crt0.s index 5d398b311..5d4e0449b 100644 --- a/libsrc/sym1/crt0.s +++ b/libsrc/sym1/crt0.s @@ -53,5 +53,5 @@ _exit: jsr donelib ; Run destructors lda TECHO ora #$80 ; Re-enable console echo sta TECHO - jsr NACCES ; Lock System RAM - rts ; Re-enter Sym-1 monitor + jmp NACCES ; Lock System RAM + ; Re-enter Sym-1 monitor diff --git a/libsrc/sym1/display.s b/libsrc/sym1/display.s index f3b2923d6..160b98806 100644 --- a/libsrc/sym1/display.s +++ b/libsrc/sym1/display.s @@ -12,7 +12,6 @@ .proc _fdisp: near - jsr SCAND ; Flash Display - rts + jmp SCAND ; Flash Display .endproc