xerox BFS.mesa Sep78 free download

File name BFS.mesa_Sep78.pdf

BFS.mesa 2-Sep-78 14:14:54 Page 1 -- BFS.Mesa Edited by Sandman on May 12, 1978 8:50 AM DIRECTORY AltoDefs: FROM "altodefs" USING [CharsPerPage, PageNumber, PageSize], AltoFileDefs: FROM "altofiledefs" USING [ CFA, CFP, eofDA, FA, fillinDA. FP, LD, SN. vDA, vDC]. BFSDefs: FROM "bfsdefs", DiskDefs: FROM "diskdefs" USING [ CBptr, CBlptr, CleanupCBqueue. DOC. DiskCheckError. DiskRequest, DoDiskCommand. FlO. GetCB. InitializeCBstorage, lCBl. nCB, nSectors, RealDA. RetryableDiskError. RetryCount, UnrecoverableDiskError, VirtualDA], DiskKDDefs: FROM "diskkddefs" USING [ AssignDiskPage, NewSN. ReleaseDiskPage], MiscDefs: FROM "miscdefs" USING [DAYTIME, SetBlock. lero]. SegmentDefs: FROM "segmentdefs" USING [ DataSegmentAddress. DataSegmentHandle. DefaultBase, DeleteDataSegment, NewDataSegment], StringDefs: FROM "stringdefs" USING [MesaToBcplString]; DEFINITIONS FROM AltoDefs, AltoFileDefs, DiskDefs; BFS: PROGRAM IMPORTS DiskDefs. DiskKDDefs, MiscDefs. SegmentDefs, StringDefs EXPORTS BFSDefs = BEGIN -- These should be POINTER TO ARRAY OF '" CAvec: TYPE = DESCRIPTOR FOR ARRAY OF POINTER; DAvee: TYPE = DESCRIPTOR FOR ARRAY OF vDA; ActOnPages: PUBLIC PROCEDURE [arg:POINTER TO update DiskRequest] RETURNS [page:PageNumber, bytes:CARDINAL]