cc65/libsrc/runtime/laddeqsp.s

;
; Ullrich von Bassewitz, 08.10.1998
;
; CC65 runtime: += operator for longs on the stack
;

        .export         laddeq0sp, laddeqysp
        .importzp       sp, sreg

laddeq0sp:
        ldy     #0
laddeqysp:
        clc
        adc     (sp),y
        sta     (sp),y
        pha
        iny
        txa
        adc     (sp),y
        sta     (sp),y
        tax
        iny
        lda     sreg
        adc     (sp),y
        sta     (sp),y
        sta     sreg
        iny
        lda     sreg+1
        adc     (sp),y
        sta     (sp),y
        sta     sreg+1
        pla
        rts
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`;`
			`; Ullrich von Bassewitz, 08.10.1998`
			`;`
			`; CC65 runtime: += operator for longs on the stack`
			`;`

Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`.export laddeq0sp, laddeqysp`
			`.importzp sp, sreg`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00
			`laddeq0sp:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`ldy #0`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00			`laddeqysp:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 11:56:54 +00:00			`clc`
			`adc (sp),y`
			`sta (sp),y`
			`pha`
			`iny`
			`txa`
			`adc (sp),y`
			`sta (sp),y`
			`tax`
			`iny`
			`lda sreg`
			`adc (sp),y`
			`sta (sp),y`
			`sta sreg`
			`iny`
			`lda sreg+1`
			`adc (sp),y`
			`sta (sp),y`
			`sta sreg+1`
			`pla`
			`rts`
This commit was generated by cvs2svn to compensate for changes in r2, which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-05-28 13:40:48 +00:00