cc65/libsrc/runtime/subysp.s

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

       	.export	  	subysp
	.importzp	sp, tmp1

.proc	subysp

       	sty    	tmp1		; Save the value
	lda	sp    		; Get lo byte
	sec
	sbc	tmp1   	       	; Subtract y value
	sta	sp  	  	; Put result back
	bcs	@L1
	dec	sp+1
@L1:   	rts			; Done

.endproc
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: Decrement the stackpointer by value in y`
			`;`

			`.export subysp`
			`.importzp sp, tmp1`

			`.proc subysp`

			`sty tmp1 ; Save the value`
			`lda sp ; Get lo byte`
			`sec`
			`sbc tmp1 ; Subtract y value`
			`sta sp ; Put result back`
			`bcs @L1`
			`dec sp+1`
Rewrite the decsp and subysp functions now since they are used more often. git-svn-id: svn://svn.cc65.org/cc65/trunk@665 b7a2c559-68d2-44c3-8de9-860c34a00d81 2001-03-24 16:15:01 +00:00			`@L1: rts ; Done`
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
			`.endproc`




Rewrite the decsp and subysp functions now since they are used more often. git-svn-id: svn://svn.cc65.org/cc65/trunk@665 b7a2c559-68d2-44c3-8de9-860c34a00d81 2001-03-24 16:15:01 +00:00