1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-18 00:07:21 +00:00
cc65/libsrc/cbm/filedes.s

44 lines
872 B
ArmAsm
Raw Normal View History

;
; Ullrich von Bassewitz, 16.11.2002
;
; File descriptor management for the POSIX I/O routines
;
.include "cbm.inc"
.include "filedes.inc"
.code
;--------------------------------------------------------------------------
; freefd: Find a free file handle and return it in X. Return carry clear if we
; found one, return a carry if no free lfns are left.
.proc freefd
ldx #0
clc
loop: lda fdtab,x
beq found
inx
cpx #MAX_FDS
bcc loop
found: rts
.endproc
;--------------------------------------------------------------------------
; Data
.data
fdtab: .byte LFN_READ
.byte LFN_WRITE
.byte LFN_WRITE
.res MAX_FDS-3
unittab:.byte CBMDEV_KBD
.byte CBMDEV_SCREEN
.byte CBMDEV_SCREEN
.res MAX_FDS-3