cc65/libsrc/runtime/bcast.s

mirror of https://github.com/cc65/cc65.git synced 2024-06-07 23:29:39 +00:00
;
; acqn, 01.16.2020
;
; CC65 runtime: boolean cast
;

        .export         bcasta, bcastax

bcastax:
        cpx     #0
        bne     L1

bcasta:
        tax
        beq     L0              ; Zero already in X

L1:     ldx     #0
        lda     #1

L0:     rts
Fix CRLFs introduced by fe3f267 2020-09-18 06:42:56 +00:00			`;`
			`; acqn, 01.16.2020`
			`;`
			`; CC65 runtime: boolean cast`
			`;`

			`.export bcasta, bcastax`

			`bcastax:`
			`cpx #0`
			`bne L1`

			`bcasta:`
			`tax`
			`beq L0 ; Zero already in X`

			`L1: ldx #0`
			`lda #1`

			`L0: rts`