PWAlps.mesa
Copyright © 1984 by Xerox Corporation. All rights reversed.
Created by: Bertrand Serlet, April 9, 1985 9:09:38 am PST
Last Edited: Serlet, July 1, 1985 10:42:42 pm PDT
PWAlps:
CEDAR
DEFINITIONS =
BEGIN
ROPE: TYPE = Rope.ROPE;
RefToListOfRopes: PUBLIC PROC [ref: REF] RETURNS [lropes: LIST OF ROPE];
ListRefAnyToListOfRope: PUBLIC PROC [list: LIST OF REF] RETURNS [LIST OF ROPE];
Context: TYPE = REF ContextRec;
ContextRec:
TYPE =
RECORD [
inputNames, outputNames: LIST OF ROPE ← NIL, -- every input and output MUST be named
table: AlpsBool.TableOfVariables,
distanceBetweenGlue: INT ← 4,
distanceBetweenContacts: INT ← 10,
optimize: BOOL ← TRUE,
debug: BOOL ← FALSE,
tileset: ROPE -- file containing the cells
];
ReadContextFromAlpsFile: PROC[fileName: ROPE] RETURNS [context: Context];
AlpsCellFromContext: PROC [context: Context, design: CD.Design] RETURNS [obj: CD.ObPtr];
END.