cc65/libsrc/geos-cbm/common/zerobss.s

;
; 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 #<__BSS_RUN__
	    ldx #>__BSS_RUN__
	    sta r1L
	    stx r1H
	    jmp ClearRam
more GEOS Kernal replacements for common/ and runtime/ routines git-svn-id: svn://svn.cc65.org/cc65/trunk@1833 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-12-23 20:44:17 +00:00			`;`
			`; 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 #<__BSS_RUN__`
			`ldx #>__BSS_RUN__`
			`sta r1L`
			`stx r1H`
small optimization, 5 bytes saved git-svn-id: svn://svn.cc65.org/cc65/trunk@2372 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-08-19 22:38:01 +00:00			`jmp ClearRam`