cc65/libsrc/runtime/axlong.s

;
; Ullrich von Bassewitz, 25.10.2000
;
; CC65 runtime: Convert int in ax into a long
;

        .export         axulong, axlong
        .importzp       sreg

; Convert AX from int to long in EAX

axulong:
        ldy     #0
        sty     sreg
        sty     sreg+1
        rts

axlong: cpx     #$80            ; Positive?
        bcc     axulong         ; Yes, handle like unsigned type
        ldy     #$ff
        sty     sreg
        sty     sreg+1
        rts
Splitted the lconvert module into three smaller ones to allow for smaller executables if not all functions are used. git-svn-id: svn://svn.cc65.org/cc65/trunk@392 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 07:06:55 +00:00			`;`
			`; Ullrich von Bassewitz, 25.10.2000`
			`;`
			`; CC65 runtime: Convert int in ax into a long`
			`;`

Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 13:56:54 +02:00			`.export axulong, axlong`
			`.importzp sreg`
Splitted the lconvert module into three smaller ones to allow for smaller executables if not all functions are used. git-svn-id: svn://svn.cc65.org/cc65/trunk@392 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 07:06:55 +00:00
			`; Convert AX from int to long in EAX`

			`axulong:`
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 13:56:54 +02:00			`ldy #0`
			`sty sreg`
			`sty sreg+1`
			`rts`
Splitted the lconvert module into three smaller ones to allow for smaller executables if not all functions are used. git-svn-id: svn://svn.cc65.org/cc65/trunk@392 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 07:06:55 +00:00
Removed (pretty inconsistently used) tab chars from source code base. 2013-05-09 13:56:54 +02:00			`axlong: cpx #$80 ; Positive?`
			`bcc axulong ; Yes, handle like unsigned type`
			`ldy #$ff`
			`sty sreg`
			`sty sreg+1`
			`rts`
Splitted the lconvert module into three smaller ones to allow for smaller executables if not all functions are used. git-svn-id: svn://svn.cc65.org/cc65/trunk@392 b7a2c559-68d2-44c3-8de9-860c34a00d81 2000-10-25 07:06:55 +00:00