mirror of
https://github.com/cc65/cc65.git
synced 2025-02-28 20:29:46 +00:00
Fixed last fix:-)
git-svn-id: svn://svn.cc65.org/cc65/trunk@1620 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
89f00263af
commit
0cd1141f60
@ -52,14 +52,22 @@ L1: lda sp,x
|
||||
lda #14
|
||||
jsr BSOUT
|
||||
|
||||
; Save system stuff and setup the stack
|
||||
; Switch off the BASIC ROM
|
||||
|
||||
lda $01
|
||||
tax ; Remember in X
|
||||
pha ; Remember the value
|
||||
and #$F8
|
||||
ora #$06 ; Enable kernal+I/O, disable basic
|
||||
sta $01
|
||||
stx mmusave ; Save the memory configuration
|
||||
|
||||
; Clear the BSS data
|
||||
|
||||
jsr zerobss
|
||||
|
||||
; Save system settings and setup the stack
|
||||
|
||||
pla
|
||||
sta mmusave ; Save the memory configuration
|
||||
|
||||
tsx
|
||||
stx spsave ; Save the system stack ptr
|
||||
@ -69,10 +77,6 @@ L1: lda sp,x
|
||||
lda #>(__RAM_START__ + __RAM_SIZE__)
|
||||
sta sp+1 ; Set argument stack ptr
|
||||
|
||||
; Clear the BSS data
|
||||
|
||||
jsr zerobss
|
||||
|
||||
; Call module constructors
|
||||
|
||||
jsr initlib
|
||||
|
Loading…
x
Reference in New Issue
Block a user