CDToCif.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Christian Le Cocq, September 4, 1987 4:22:01 pm PDT
Conversion from CD data to CIF data
DIRECTORY
CD USING [Design, Instance],
IO USING [STREAM],
Rope USING [ROPE];
CDToCif: CEDAR DEFINITIONS
~
BEGIN
WriteCIF:
PROC [design:
CD.Design, mainInst:
CD.Instance, cifFile:
IO.
STREAM, cifPerLambda:
INT, flattenAtomics:
BOOL ←
FALSE]
RETURNS [errMsg: Rope.
ROPE];
Writes the CIF data on the stream cifFile.
END.