BFS.mesa_Sep78.pdf part of xerox BFS.mesa Sep78 BFS.mesa_Sep78.pdf, xerox mesa 4.0_1978 listing Mesa_4_System BFS.mesa

Text preview for : BFS.mesa_Sep78.pdf part of xerox BFS.mesa Sep78 xerox mesa 4.0_1978 listing Mesa_4_System BFS.mesa_Sep78.pdf

Back to : BFS.mesa_Sep78.pdf | Home

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]