]> git.sur5r.net Git - cc65/blobdiff - libsrc/atari/close.s
The spans do now contain the size of a span, no longer the end offset.
[cc65] / libsrc / atari / close.s
index 77714359358ce234152c092939750a657d871009..d89a0ee13c205ed24e126435e21e94454db2d12e 100644 (file)
@@ -1,7 +1,7 @@
 ;
 ; Christian Groessler, May-2000
 ;
-; int close(int fd);
+; int __fastcall__ close(int fd);
 ;
 
        .include "atari.inc"
        .import fdtoiocb_down,__inviocb
 
 .proc  _close
-       jsr     popax
        jsr     fdtoiocb_down           ; get iocb index into X and decr. usage count
        bmi     inverr
        bne     ok                      ; not last one -> don't close yet
-;      asl     a
-;      asl     a
-;      asl     a
-;      asl     a
-;      tax
        lda     #CLOSE
        sta     ICCOM,x
        jsr     CIOV