-- CommonSoftwareFileTypes.mesa (last edited by: Luniewski on: December 17, 1980 1:38 PM) --
DIRECTORY
File USING [Type],
FileTypes USING [CommonSoftwareFileType];
CommonSoftwareFileTypes: DEFINITIONS =
BEGIN
CommonSoftwareFileType: TYPE = FileTypes.CommonSoftwareFileType;
-- File Types
tUnassigned:File.Type = [CommonSoftwareFileType[FIRST[CommonSoftwareFileType]]];
tDirectory:File.Type = [CommonSoftwareFileType[FIRST[CommonSoftwareFileType]+1]];
-- tATVMSTransaction:File.Type = [CommonSoftwareFileType[FIRST[CommonSoftwareFileType]+2]];
tBackstopLog:File.Type = [CommonSoftwareFileType[FIRST[CommonSoftwareFileType]+3]];
tCarryVolumeDirectory:File.Type = [CommonSoftwareFileType[FIRST[CommonSoftwareFileType]+4]];
END....