2 ; Ullrich von Bassewitz, 17.06.1998
5 ; /* Find a free descriptor slot */
17 Loop: and __filetab + _FILE_f_flags,y ; load flags
18 beq Found ; jump if closed
22 cpy #(FOPEN_MAX * _FILE_size) ; Done?
29 ; Free slot found, get address
34 ldx #>__filetab ; High byte
35 bcc @L1 ; Jump if no overflow