cc65/libsrc/runtime/addysp.s

;
; Ullrich von Bassewitz, 25.10.2000
;
; CC65 runtime: Increment the stackpointer by value in y
;

        .export         addysp1, addysp
        .importzp       sp

addysp1:
        iny
addysp: pha                     ; Save A
        clc
        tya                     ; Get the value
        adc     sp              ; Add low byte
        sta     sp              ; Put it back
        bcc     @L1             ; If no carry, we're done
        inc     sp+1            ; Inc high byte
@L1:    pla                     ; Restore A
        rts
More module splits git-svn-id: svn://svn.cc65.org/cc65/trunk@393 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 19:53:22 +00:00			`;`
			`; Ullrich von Bassewitz, 25.10.2000`
			`;`
			`; CC65 runtime: Increment the stackpointer by value in y`
			`;`

Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.export addysp1, addysp`
			`.importzp sp`
More module splits git-svn-id: svn://svn.cc65.org/cc65/trunk@393 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 19:53:22 +00:00
			`addysp1:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`iny`
			`addysp: pha ; Save A`
			`clc`
			`tya ; Get the value`
			`adc sp ; Add low byte`
			`sta sp ; Put it back`
			`bcc @L1 ; If no carry, we're done`
			`inc sp+1 ; Inc high byte`
			`@L1: pla ; Restore A`
			`rts`
More module splits git-svn-id: svn://svn.cc65.org/cc65/trunk@393 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 19:53:22 +00:00