mirror of
https://github.com/cc65/cc65.git
synced 2025-02-14 19:30:52 +00:00
Squeeze 2 bytes out of the startup code
git-svn-id: svn://svn.cc65.org/cc65/trunk@414 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
00e858c9de
commit
7c436aec1d
@ -46,10 +46,10 @@ zpspace = * - zpstart ; Zero page space allocated
|
||||
; ------------------------------------------------------------------------
|
||||
; Actual code
|
||||
|
||||
ldy #zpspace-1
|
||||
L1: lda sp,y
|
||||
sta zpsave,y ; Save the zero page locations we need
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L1: lda sp,x
|
||||
sta zpsave,x ; Save the zero page locations we need
|
||||
dex
|
||||
bpl L1
|
||||
|
||||
; Clear the BSS data
|
||||
@ -89,8 +89,7 @@ L1: lda sp,y
|
||||
|
||||
; fall thru to exit...
|
||||
|
||||
_exit:
|
||||
lda #$ff
|
||||
_exit: lda #$ff
|
||||
sta TEXTTYP
|
||||
|
||||
jsr doatexit ; call exit functions
|
||||
@ -100,10 +99,10 @@ _exit:
|
||||
|
||||
; Copy back the zero page stuff
|
||||
|
||||
ldy #zpspace-1
|
||||
L2: lda zpsave,y
|
||||
sta sp,y
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L2: lda zpsave,x
|
||||
sta sp,x
|
||||
dex
|
||||
bpl L2
|
||||
|
||||
; Reset changed vectors, back to basic
|
||||
|
@ -70,10 +70,10 @@ zpspace = * - zpstart ; Zero page space allocated
|
||||
|
||||
; Save the zero page locations we need
|
||||
|
||||
ldy #zpspace-1
|
||||
L1: lda sp,y
|
||||
sta zpsave,y
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L1: lda sp,x
|
||||
sta zpsave,x
|
||||
dex
|
||||
bpl L1
|
||||
|
||||
; Clear the BSS data
|
||||
@ -175,10 +175,10 @@ _exit: jsr doatexit ; call exit functions
|
||||
|
||||
; Copy back the zero page stuff
|
||||
|
||||
ldy #zpspace-1
|
||||
L2: lda zpsave,y
|
||||
sta sp,y
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L2: lda zpsave,x
|
||||
sta sp,x
|
||||
dex
|
||||
bpl L2
|
||||
|
||||
; Back to DOS
|
||||
|
@ -54,10 +54,10 @@ Head: .word @Next
|
||||
; ------------------------------------------------------------------------
|
||||
; Actual code
|
||||
|
||||
ldy #zpspace-1
|
||||
L1: lda sp,y
|
||||
sta zpsave,y ; Save the zero page locations we need
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L1: lda sp,x
|
||||
sta zpsave,x ; Save the zero page locations we need
|
||||
dex
|
||||
bpl L1
|
||||
|
||||
; Close open files
|
||||
@ -109,10 +109,10 @@ _exit: jsr doatexit ; call exit functions
|
||||
|
||||
; Copy back the zero page stuff
|
||||
|
||||
ldy #zpspace-1
|
||||
L2: lda zpsave,y
|
||||
sta sp,y
|
||||
dey
|
||||
ldx #zpspace-1
|
||||
L2: lda zpsave,x
|
||||
sta sp,x
|
||||
dex
|
||||
bpl L2
|
||||
|
||||
; Back to basic
|
||||
|
Loading…
x
Reference in New Issue
Block a user