$SAVE NOLIST /***************************************************************************** * IO.LIT: Definition of parameter codes frequently used in BIOS and EIOS * system calls. *****************************************************************************/ DECLARE /* used on the mode parameter of open, and the mode field of connection$status */ READ$ONLY LITERALLY '1', WRITE$ONLY LITERALLY '2', READ$WRITE LITERALLY '3', READ$ONLY_NO$SHARE LITERALLY '4', WRITE$ONLY_NO$SHARE LITERALLY '5', READ$WRITE_NO$SHARE LITERALLY '6', /* used on the share parameter of open, and the share field of connection$status and file$status */ NO$SHARE LITERALLY '0', SHARE$READ LITERALLY '1', SHARE$WRITE LITERALLY '2', SHARE$ALL LITERALLY '3', /* used with seek */ SEEK$BACKWARD LITERALLY '1', SEEK$ABSOLUTE LITERALLY '2', SEEK$FORWARD LITERALLY '3', SEEK$END$OF$FILE LITERALLY '4', /* used in the access fields of get file$status */ NO$ACCESS LITERALLY '00h', DELETE$ACCESS$BIT LITERALLY '01h', READ$ACCESS$BIT LITERALLY '02h', ADD$ACCESS$BIT LITERALLY '04h', UPDATE$ACCESS$BIT LITERALLY '08h', ALL$ACCESS LITERALLY '0Fh', /* used in the file driver parameter of attach$device and the file driver field of get$connection$status */ SOA$PHYSICAL$FILE LITERALLY '1', SOA$STREAM$FILE LITERALLY '2', SOA$NAMED$FILE LITERALLY '4', SOA$REMOTE$FILE LITERALLY '5', /* used in the file$drivers field of file$status */ FD$PHYSICAL$BIT LITERALLY '01H', FD$STREAM$BIT LITERALLY '02H', FD$NAMED$BIT LITERALLY '08H', FD$REMOTE$BIT LITERALLY '10H', /* function codes for SPECIAL primitives */ SPECIAL$FORMAT LITERALLY '0', SPECIAL$QUERY LITERALLY '0', SPECIAL$SATISFY LITERALLY '1', SPECIAL$NOTIFY LITERALLY '2', SPECIAL$GET$DEVICE$DATA LITERALLY '3', SPECIAL$GET$TERM$DATA LITERALLY '4', SPECIAL$SET$TERM$DATA LITERALLY '5', SPECIAL$SET$SIGNAL LITERALLY '6', SPECIAL$REWIND$TAPE LITERALLY '7', SPECIAL$READ$FILE$MARK LITERALLY '8', SPECIAL$WRITE$FILE$MARK LITERALLY '9', SPECIAL$RETENSION$TAPE LITERALLY '10', SPECIAL$SET$CHAR$FONT LITERALLY '11', SPECIAL$SET$BAD$INFO LITERALLY '12', SPECIAL$GET$BAD$INFO LITERALLY '13', SPECIAL$GET$TERM$STATUS LITERALLY '16', SPECIAL$CANCEL$TERM$IO LITERALLY '17', SPECIAL$RESUME$TERM$IO LITERALLY '18'; $RESTORE