Service Manuals, User Guides, Schematic Diagrams or docs for : xerox mesa 4.0_1978 listing Mesa_4_System UnNewConfig.mesa_Sep78
<< Back |
HomeMost service manuals and schematics are PDF files, so You will need Adobre Acrobat Reader to view : Acrobat Download
Some of the files are DjVu format. Readers and resources available here : DjVu Resources
For the compressed files, most common are zip and rar. Please, extract files with Your favorite compression software ( WinZip, WinRAR ... ) before viewing.
If a document has multiple parts, You should download all, before extracting.
Good luck. Repair on Your own risk. Make sure You know what You are doing.
Image preview - the first page of the document
>> Download UnNewConfig.mesa_Sep78 documenatation <<Text preview - extract from the document, UnNewConfig .mesa 2-Sep-78 18:05:56 Page 1
-- UnNewConfig.mesa; edited by Sandman on Aug 31, 1978 5:04 PM
DIRECTORY
BcdDefs: FROM "bcddefs" USING [MTHandle, MTIndex, UnboundLink],
ControlDefs: FROM "controldefs" USING [
ControlLink, FrameCodeBase, Free, GFT, GFTIndex, GFTItem,
GlobalFrameHandle, NullGlobalFrame, TrapLink],
FrameDefs: FROM "framedefs" USING [
EnumerateGlobalFrames, GlobalFrame, LockCode, UnlockCode, UnNew],
InlineDefs: FROM "inlinedefs" USING [BITAND],
LoaderBcdUtilDefs: FROM "loaderbcdutildeFs" USING [
BedBase, EnumerateMaduleTable, ReleaseBcdSeg, SetUpBed],
LaaderDefs: FROM "loaderdefs",
LoadStateDefs: FROM "loadstatedefs" USING [
BedAddress, BedSegFromLaadState, ConfigIndex, EnumerateLoadStateBcds,
InitializeRelocation, InputLoadState, MapRealTaConfig, ReleaseLoadState,
ReleaseReloeation, Relocation, RemoveConfig, SetUnresolvedImports],
SegmentDefs: FROM "segmentdefs" USING [
DeleteFileSegment, FileSegmentAddress, FileSegmentHandle, SwapError,
SwapIn, SwapUp, Unlock],
SystemDefs: FROM "systemdefs" USING [FreeSegment];
UnNewConfig: PROGRAM
IMPORTS FrameDeFs, LoadStateDefs, LoaderBcdUtilDefs, SegmentDefs, SystemDefs
EXPORTS LoaderDefs = BEGIN
ConfigIndex: TYPE = LoadStateDeFs.ConfigIndex;
Relocation: TYPE = LoadStateDefs.Relocation;
BcdBase: TYPE = LoaderBcdUtilDefs.BcdBase;
GlobalFrameHandle: TYPE = ControlDefs.GlobalFrameHandle;
NullGlobalFrame: GlobalFrameHandle = ControlDefs.NullGlabalFrame;
UnNewConfig: PUBLIC PROCEDURE [Frame: GlobalFrameHandle] =
BEGIN OPEN LaadStateDefs;
config: CanfigIndex;
rel: Relocat ion;
bcdseg: SegmentDefs.FileSe9mentHandle;
bcd: BcdBase;
FindOriginal: PROCEDURE [f: GlobalFrameHandle] RETURNS [BOOLEAN] ~
BEGIN
IF f # frame THEN
BEGIN
IF SameCode[frame, f] = identical AND ~f.copied THEN
BEGIN frame ~ f; RETURN[TRUE] END;
END;
RETURN[FALSE];
END;
IF frame.copied THEN [] ~ FrameDefs.EnumerateGlobalFrames[FindOriginal];
[] ~ InputLoadState[];
[config: config] ~ MapRealToConfig[frame.gfi];
bcdseg ~ BcdSegFromLoadState[conFig];
bcd ~ LoaderBcdUtilDefs.SetUpBcd[bcdseg];
rel ~ InitializeRelocation[config];
UnBindConFig[config, bcd, rel];
CleanupFrames[rel];
CleanupGFT[rel];
RemoveConfig[rel, config];
ReleaseRelocation[rel];
ReleaseLoadState[];
LoaderBcdUtilDeFs.ReleaseBcdSeg[bcdseg];
RETURN
END;
CodeMatch: TYPE = {identical. same, different};
SameCode: PROCEDURE [fl, f2: GlobalFrameHandle] RETURNS [CodeMatch]
◦ Jabse Service Manual Search 2026 ◦ Jabse Pravopis ◦ onTap.bg ◦ Other service manual resources online : Fixya ◦ eServiceinfo