Merge pull request #552 from polluks/master

[cc65] / libsrc / cbm / c_ckout.s

diff --git a/libsrc/cbm/c_ckout.s b/libsrc/cbm/c_ckout.s
index 299254c03d611a4ddf96bcd2ee55f37a514940f4..380d7170a95a1f4f7223a66d193744051339ee86 100644 (file)
--- a/libsrc/cbm/c_ckout.s
+++ b/libsrc/cbm/c_ckout.s
@@ -4,13 +4,14 @@
 ; unsigned char __fastcall__ cbm_k_ckout (unsigned char FN);
 ;
 
-               .export         _cbm_k_ckout
+        .export         _cbm_k_ckout
         .import         CKOUT
 
 
 _cbm_k_ckout:
-       tax
-               jsr     CKOUT
-       bcs     @NotOk
-       lda     #0
-@NotOk:        rts
+        tax
+        jsr     CKOUT
+        ldx     #0              ; Clear high byte
+        bcs     @NotOk
+        txa
+@NotOk: rts