the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Improved consistency of notation for return value promotion.

Browse Source
This commit is contained in:
Oliver Schmidt
2025-03-13 22:03:37 +01:00
parent 3edb959298
commit ee540678e6
16 changed files with 26 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
libsrc/apple2/curdevice.s
View File

@@ -23,5 +23,5 @@ _getcurrentdevice:
bne :+ bne :+
lda #$FF ; INVALID_DEVICE lda #$FF ; INVALID_DEVICE
: ldx #$00 : ldx #>$0000
rts rts

2
libsrc/apple2/diocommon.s
View File

@@ -31,5 +31,5 @@ diocommon:
dioepilog: dioepilog:
; Return success or error ; Return success or error
sta ___oserror sta ___oserror
ldx #$00 ldx #>$0000
rts rts

2
libsrc/apple2/get_iigs_speed.s
View File

@@ -16,7 +16,7 @@ _get_iigs_speed:
lda CYAREG ; Check current setting lda CYAREG ; Check current setting
bpl :+ bpl :+
lda #SPEED_FAST lda #SPEED_FAST
ldx #$00 ldx #>$0000
rts rts
.assert SPEED_SLOW = 0, error .assert SPEED_SLOW = 0, error
: jmp return0 ; SPEED_SLOW : jmp return0 ; SPEED_SLOW

2
libsrc/apple2/getdevice.s
View File

@@ -30,5 +30,5 @@ next: inx
bne next bne next
done: txa done: txa
ldx #$00 ldx #>$0000
rts rts

4
libsrc/apple2/joy/a2.stdjoy.s
View File

@@ -92,7 +92,7 @@ COUNT:
bvc noiic ; Not $4x bvc noiic ; Not $4x
dex ; Only one joystick for the //c dex ; Only one joystick for the //c
noiic: txa ; Number of joysticks we support noiic: txa ; Number of joysticks we support
ldx #$00 ldx #>$0000
rts rts
; READ routine. Read a particular joystick passed in A. ; READ routine. Read a particular joystick passed in A.
@@ -170,5 +170,5 @@ nogs2: lda #$00 ; 0 0 0 0 0 0 0 0
; Finalize ; Finalize
eor #%00010100 ; BTN_2 BTN_1 DOWN UP RIGHT LEFT 0 0 eor #%00010100 ; BTN_2 BTN_1 DOWN UP RIGHT LEFT 0 0
ldx #$00 ldx #>$0000
rts rts

2
libsrc/apple2/mou/a2.stdmou.s
View File

@@ -353,7 +353,7 @@ SHOW:
; BUTTONS: Return the button mask in A/X. ; BUTTONS: Return the button mask in A/X.
BUTTONS: BUTTONS:
lda info + MOUSE_INFO::BUTTONS lda info + MOUSE_INFO::BUTTONS
ldx #$00 ldx #>$0000
rts rts
; POS: Return the mouse position in the MOUSE_POS struct pointed to by ptr1. ; POS: Return the mouse position in the MOUSE_POS struct pointed to by ptr1.

2
libsrc/apple2/open.s
View File

@@ -209,7 +209,7 @@ done: lda tmp1 ; Restore fd
jsr popname ; Preserves A jsr popname ; Preserves A
; Return success ; Return success
ldx #$00 ldx #>$0000
stx ___oserror stx ___oserror
rts rts

2
libsrc/apple2/oserror.s
View File

@@ -23,7 +23,7 @@ ___osmaperrno:
; Found the code ; Found the code
: lda ErrTab-1,x : lda ErrTab-1,x
ldx #$00 ; High byte always zero ldx #>$0000
rts rts
.rodata .rodata

2
libsrc/apple2/revers.s
View File

@@ -18,5 +18,5 @@ normal: dex ; $00->$FF, $40->$3F
stx INVFLG ; Save new flag value stx INVFLG ; Save new flag value
bmi :+ ; Jump if current value is $FF (normal) bmi :+ ; Jump if current value is $FF (normal)
lda #$01 ; Return "inverse" lda #$01 ; Return "inverse"
: ldx #$00 : ldx #>$0000
rts rts

14
libsrc/apple2/ser/a2.gs.s
View File

@@ -295,7 +295,7 @@ SER_CLOSE:
bcc IIgs bcc IIgs
lda #SER_ERR_NO_DEVICE ; Not a IIgs lda #SER_ERR_NO_DEVICE ; Not a IIgs
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
IIgs: IIgs:
@@ -500,7 +500,7 @@ BaudOK:
SetupOut: SetupOut:
plp ; Reenable interrupts if needed plp ; Reenable interrupts if needed
ldx #$00 ; Promote char return value ldx #>$0000
sty Opened sty Opened
rts rts
@@ -539,7 +539,7 @@ SER_GET:
rts rts
NoData: NoData:
lda #SER_ERR_NO_DATA lda #SER_ERR_NO_DATA
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
@@ -560,7 +560,7 @@ SER_PUT:
: ldy SendFreeCnt ; Do we have room to store byte? : ldy SendFreeCnt ; Do we have room to store byte?
bne :+ bne :+
lda #SER_ERR_OVERFLOW lda #SER_ERR_OVERFLOW
ldx #$00 ldx #>$0000
rts rts
: ldy SendTail ; Put byte into send buffer & send : ldy SendTail ; Put byte into send buffer & send
@@ -571,7 +571,7 @@ SER_PUT:
jsr TryToSend jsr TryToSend
lda #SER_ERR_OK lda #SER_ERR_OK
.assert SER_ERR_OK = 0, error .assert SER_ERR_OK = 0, error
tax tax ; Promote char return value
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
@@ -608,11 +608,11 @@ SER_IOCTL:
stx Channel stx Channel
.assert SER_ERR_OK = 0, error .assert SER_ERR_OK = 0, error
tax tax ; Promote char return value
rts rts
: lda #SER_ERR_INV_IOCTL : lda #SER_ERR_INV_IOCTL
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------

8
libsrc/apple2/ser/a2.ssc.s
View File

@@ -345,7 +345,7 @@ BaudOK: sta tmp1
stx Index ; Mark port as open stx Index ; Mark port as open
lda #SER_ERR_OK lda #SER_ERR_OK
Out: Out:
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
@@ -360,7 +360,7 @@ SER_GET:
cmp #$FF cmp #$FF
bne :+ bne :+
lda #SER_ERR_NO_DATA lda #SER_ERR_NO_DATA
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
: ldy Stopped ; Check for flow stopped : ldy Stopped ; Check for flow stopped
@@ -408,7 +408,7 @@ SER_PUT:
ldy SendFreeCnt ; Reload SendFreeCnt after TryToSend ldy SendFreeCnt ; Reload SendFreeCnt after TryToSend
bne :+ bne :+
lda #SER_ERR_OVERFLOW lda #SER_ERR_OVERFLOW
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
: ldy SendTail ; Put byte into send buffer : ldy SendTail ; Put byte into send buffer
@@ -456,7 +456,7 @@ SER_IOCTL:
rts rts
: lda #SER_ERR_INV_IOCTL : lda #SER_ERR_INV_IOCTL
ldx #$00 ; Promote char return value ldx #>$0000
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------

2
libsrc/apple2/set_iigs_speed.s
View File

@@ -25,5 +25,5 @@ _set_iigs_speed:
set_speed: set_speed:
sta CYAREG sta CYAREG
txa txa
ldx #$00 ldx #>$0000
rts rts

2
libsrc/apple2/stat.s
View File

@@ -121,7 +121,7 @@ eoferr:
beq done beq done
lda #$FF lda #$FF
done: done:
tax tax ; Promote char return value
rts rts
.bss .bss

2
libsrc/apple2/tgi/a2.hi.s
View File

@@ -342,7 +342,7 @@ GETPIXEL:
lda #$03 ; 3 (white) lda #$03 ; 3 (white)
: bcc :+ : bcc :+
adc #$03 ; += 4 (black -> black2, white -> white2) adc #$03 ; += 4 (black -> black2, white -> white2)
: ldx #$00 : ldx #>$0000
bit $C080 ; Switch in LC bank 2 for R/O bit $C080 ; Switch in LC bank 2 for R/O
rts rts

2
libsrc/apple2/tgi/a2.lo.s
View File

@@ -321,7 +321,7 @@ GETPIXEL:
jsr SCRN jsr SCRN
tax tax
lda COL2TGI,x lda COL2TGI,x
ldx #$00 ldx #>$0000
bit $C080 ; Switch in LC bank 2 for R/O bit $C080 ; Switch in LC bank 2 for R/O
rts rts

2
libsrc/apple2/wherey.s
View File

@@ -12,5 +12,5 @@ _wherey:
lda CV lda CV
sec sec
sbc WNDTOP sbc WNDTOP
ldx #$00 ldx #>$0000
rts rts