Copyright (C) 1994, Digital Equipment Corp. INTERFACEM3CImportASTrans ; IMPORT M3AST_AS; PROCEDURE Set(cu: M3AST_AS.Compilation_Unit; genericFormalsOnly := FALSE);
Transform 'cu' so that statements of the formIMPORT A AS B
are eliminated, and all instances ofB.x
are replaced byA.x
. This is destructive, naturally.If 'genericFormalsOnly =TRUE', then 'cu' must be a generic instantiation, and the transformation is restricted to values of B in
IMPORT A AS B
, such that B was a generic formal parameter.
END M3CImportASTrans.