2 ; Ullrich von Bassewitz, 31.05.1998
4 ; Several small file stream functions
7 .export _clearerr, _feof, _ferror, _fileno, _fflush
14 ; Get the FILE* parameter, check if the file is open
20 lda (ptr1),y ; get f->f_flags
21 and #_FOPEN ; file open?
29 ; void clearerr (FILE* f);
36 and #<~(_FEOF | _FERROR)
53 ; int ferror (FILE* f);
65 ; int fileno (FILE* f);
77 ; int __fastcall__ fflush (FILE* f);