mirror of
https://github.com/cc65/cc65.git
synced 2025-01-08 20:31:31 +00:00
Fixes/improvements from Stefan Haubenthal
git-svn-id: svn://svn.cc65.org/cc65/trunk@2873 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
95c0fb6e0b
commit
e717b44d4d
@ -4,7 +4,11 @@
|
||||
; unsigned char __fastcall__ cbm_k_basin (void);
|
||||
;
|
||||
|
||||
.export _cbm_k_basin
|
||||
.import BASIN
|
||||
.export _cbm_k_basin
|
||||
.import BASIN
|
||||
|
||||
_cbm_k_basin = BASIN
|
||||
|
||||
_cbm_k_basin:
|
||||
jsr BASIN
|
||||
ldx #0 ; Clear high byte
|
||||
rts
|
||||
|
@ -10,7 +10,7 @@
|
||||
|
||||
_cbm_k_open:
|
||||
jsr OPEN
|
||||
ldx #0 ; Clear high byte
|
||||
bcs @NotOk
|
||||
lda #0
|
||||
@NotOk: ldx #0 ; Clear high byte
|
||||
rts
|
||||
txa
|
||||
@NotOk: rts
|
||||
|
@ -4,8 +4,11 @@
|
||||
; unsigned char __fastcall__ cbm_k_readst (void);
|
||||
;
|
||||
|
||||
.export _cbm_k_readst
|
||||
.import READST
|
||||
.export _cbm_k_readst
|
||||
.import READST
|
||||
|
||||
|
||||
_cbm_k_readst = READST
|
||||
_cbm_k_readst:
|
||||
jsr READST
|
||||
ldx #0 ; Clear high byte
|
||||
rts
|
||||
|
Loading…
Reference in New Issue
Block a user