]> git.sur5r.net Git - cc65/blobdiff - libsrc/cbm/c_ckout.s
no TGI_ERR_NO_MEM or TGI_ERR_NO_IOCB anymore: replaced by TGI_ERR_NO_RES
[cc65] / libsrc / cbm / c_ckout.s
index 7fffe9f70bc63515ca0f7f1e5978baa5a52a9291..faeee4b7088e2cd3f1cb678c542aaabbaa4cbaaf 100644 (file)
@@ -1,24 +1,17 @@
 ;
 ; Ullrich von Bassewitz, 03.06.1999
 ;
-; unsigned __fastcall__ cbm_ckout (unsigned char FN);
+; unsigned char __fastcall__ cbm_k_ckout (unsigned char FN);
 ;
 
-               .include        "cbm.inc"
+               .export         _cbm_k_ckout
+        .import         CKOUT
 
-               .export         _cbm_ckout
 
-_cbm_ckout:
+_cbm_k_ckout:
        tax
                jsr     CKOUT
-       ldx     #0
-       bcc     @Ok
-       inx
-       rts
-@Ok:   txa
-       rts
-
-
-
-
-
+       ldx     #0              ; Clear high byte
+       bcs     @NotOk
+        txa
+@NotOk:        rts