|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 896 (0x380)
Types: TextFile
Names: »FIBDEF.LIB«
└─⟦8dcf1351b⟧ Bits:30004118/disk2.imd SW1720/I5 Pascal/MT+ Release 5.5
└─⟦this⟧ »FIBDEF.LIB«
└─⟦e44a40b06⟧ Bits:30005968 SW1820/I8 RC855 Pascal MT+ Release 5.5
└─⟦this⟧ »FIBDEF.LIB«
(* modified for 5.5 to add fauxio *)
(* FIB LAYOUT *)
TYPE
OPTTYPE = (notopen,fwrite,frdwr,frandom,fconio,ftrmio,flstout,fauxio);
FIB=RECORD
FNAME : STRINGÆ16Å; (* d:filename.ext *)
FCB : PACKED ARRAY Æ0..34Å OF CHAR; (* CP/M FILE CONTROL BLOCK *)
BUFLEN : INTEGER; (* SIZE OF FBUFFER *)
BUFIDX : INTEGER; (* CURRENT INDEX INTO FBUFFER *)
OPTION : OPTTYPE;
IOSIZE : INTEGER; (* SIZE OF NEXT TRANSFER *)
FEOLN : BOOLEAN; (* TRUE IF TEXT FILE AT END-OF-LINE *)
FEOF : BOOLEAN; (* TRUE IF AT END-OF-FILE *)
FBUFADR: WORD; (* POINTER TO FBUFFER *)
FSECINX: 0..128; (* INDEX INTO FSECTOR +1 FOR OVERFLOW *)
FTEXT : BOOLEAN; (* TRUE IF THIS IS A TEXT FILE! *)
NOSECTRS:BOOLEAN; (* TRUE IF NO MORE DISK DATA AVAILABLE *)
FSECTOR: PACKED ARRAY Æ0..127Å OF CHAR; (* 1 SECTOR BUFFER FOR CP/M *)
FBUFFER: PACKED ARRAY Æ0..0 Å OF CHAR;
END;
«eof»