<<>> <> <> <> <<>> DIRECTORY MobDefs USING [MobBase], Table USING [Base]; MobMapper: DEFINITIONS = BEGIN AlterMobResults: TYPE = {noop, altered, badVersion}; BadMobContents: ERROR; <<... is raised if something inconsistent is found in the mob file.>> AlterMob: PROC [mob: MobDefs.MobBase, base: Table.Base, limit: CARD] RETURNS [AlterMobResults]; <<... alters the mob file from the written format to the host format.>> <> <> <> <= limit will cause a BadMobContents error (this is useful as a debugging check)>> END.