more GEOS Kernal replacements for common/ and runtime/ routines
git-svn-id: svn://svn.cc65.org/cc65/trunk@1833 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -11,7 +11,7 @@
|
||||
@$(AS) -o $@ $(AFLAGS) $<
|
||||
|
||||
C_OBJS = _afailed.o abort.o perror.o
|
||||
S_OBJS = copydata.o memcpy.o memset.o
|
||||
S_OBJS = copydata.o memcpy.o memset.o zerobss.o
|
||||
|
||||
all: $(C_OBJS) $(S_OBJS)
|
||||
|
||||
|
||||
27
libsrc/geos/common/zerobss.s
Normal file
27
libsrc/geos/common/zerobss.s
Normal file
@@ -0,0 +1,27 @@
|
||||
;
|
||||
; Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl>
|
||||
; 23.12.2002
|
||||
;
|
||||
; Zero the bss segment.
|
||||
;
|
||||
|
||||
.export zerobss
|
||||
.import __BSS_RUN__, __BSS_SIZE__
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
|
||||
.code
|
||||
|
||||
zerobss:
|
||||
lda #<__BSS_SIZE__
|
||||
ldx #>__BSS_SIZE__
|
||||
sta r0L
|
||||
stx r0H
|
||||
lda #0
|
||||
sta r2L
|
||||
lda #<__BSS_RUN__
|
||||
ldx #>__BSS_RUN__
|
||||
sta r1L
|
||||
stx r1H
|
||||
jmp FillRam
|
||||
Reference in New Issue
Block a user