]> git.sur5r.net Git - cc65/blobdiff - libsrc/common/fread.s
Renamed to '--no-crt-lib'
[cc65] / libsrc / common / fread.s
index 1a543442013a941477763cb99f394faae163ea46..91d69298539d65fa5be31664da0ce46235177740 100644 (file)
 
 ; Save the file pointer into the register bank
 
-       sta     file
-       stx     file+1
+        sta     file
+        stx     file+1
 
 ; Check if the file is open
 
-       ldy     #_FILE::f_flags
-       lda     (file),y
-       and     #_FOPEN                 ; Is the file open?
-               beq     @L1                     ; Branch if no
+        ldy     #_FILE::f_flags
+        lda     (file),y
+        and     #_FOPEN                 ; Is the file open?
+        beq     @L1                     ; Branch if no
 
 ; Check if the stream is in an error state
 
-        lda    (file),y                ; get file->f_flags again
-       and     #_FERROR
-       beq     @L2
+        lda     (file),y                ; get file->f_flags again
+        and     #_FERROR
+        beq     @L2
 
 ; File not open or in error state
 
-@L1:    lda            #EINVAL
+@L1:    lda     #EINVAL
         jsr     __seterrno              ; Set __errno, return zero in A
         tax                             ; a/x = 0
         jmp     @L99                    ; Bail out
 
         pha
 
-; Copy the buffer pointer into ptr1, and increment the pointer value passed 
+; Copy the buffer pointer into ptr1, and increment the pointer value passed
 ; to read() by one, so read() starts to store data at buf+1.
 
         ldy     #0
         cmp     #$FF
         bne     @L8
 
-; Error in read. Set the stream error flag and bail out. _oserror and/or
-; errno are already set by read(). On entry to label @L7, X must be zero.
+; Error in read. Set the stream error flag and bail out. errno has already
+; been set by read(). On entry to label @L7, X must be zero. 
 
         inx                             ; X = 0
         lda     #_FERROR
 ; Data
 
 .bss
-save:          .res    2
+save:   .res    2
 pb:     .res    1