2 ; Christian Groessler, Oct-2000
4 ; allocates a new fd in the indirection table
11 .import fd_table, fd_index
13 .export fdt_to_fdi,getfd
18 ; returns a fd_index entry pointing to the given ft_table entry
19 ; get fd_table entry in A
20 ; return C = 0/1 for OK/error
21 ; return fd_index entry in A if OK
45 ; get a new fd pointing to a ft_table entry
46 ; usage counter of ft_table entry incremented
48 ; return C = 0/1 for OK/error
49 ; returns fd in A if OK
50 ; registers destroyed, tmp1 destroyed
53 sta tmp1 ; save fd_table entry
62 inc fd_table+ft_usa,x ; increment usage counter