Fixed two more function that didn't clear the high byte of the function result.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4049 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/libsrc/cbm/c_chkin.s b/libsrc/cbm/c_chkin.s
index f687147ac85b3433345f2990f373ddd087bd8ef1..4565e6fb9f125450657523521f76cad0f1454ff6 100644 (file)
--- a/libsrc/cbm/c_chkin.s
+++ b/libsrc/cbm/c_chkin.s
@@ -10,7 +10,8 @@
 _cbm_k_chkin:
        tax
                jsr     CHKIN
+       ldx     #0              ; Clear high byte
        bcs     @NotOk
-        lda     #0
+        txa
 @NotOk:        rts
 

diff --git a/libsrc/cbm/c_ckout.s b/libsrc/cbm/c_ckout.s
index 299254c03d611a4ddf96bcd2ee55f37a514940f4..faeee4b7088e2cd3f1cb678c542aaabbaa4cbaaf 100644 (file)
--- a/libsrc/cbm/c_ckout.s
+++ b/libsrc/cbm/c_ckout.s
@@ -11,6 +11,7 @@
 _cbm_k_ckout:
        tax
                jsr     CKOUT
+       ldx     #0              ; Clear high byte
        bcs     @NotOk
-       lda     #0
+        txa
 @NotOk:        rts