SinixHighlight.mesa
Copyright c 1984 by Xerox Corporation. All rights reversed.
Jean-Marc Frailong May 30, 1986 10:05:59 pm PDT
Bertrand Serlet June 1, 1986 3:41:52 pm PDT
DIRECTORY
CD, Rope, Sinix;
SinixHighlight: CEDAR DEFINITIONS = BEGIN
ExtractContext: TYPE = REF ExtractContextRec;
ExtractContextRec: TYPE = RECORD [
mode: Sinix.Mode, -- the extract mode to be used
userData: REF ← NIL -- the default context (used by Sisyph)
];
ExtractContextCreator: TYPE = PROC [design: CD.Design] RETURNS [context: ExtractContext];
Create menu entries for extraction and highlighting
RegisterDefaultLayoutMode: PROC [technology: CD.Technology, contextCreator: ExtractContextCreator];
Create menu entry for highlighting using a non-layout extractor (e.g. Sisyph). If technology is NIL, the entry will be valid for ALL technologies.
RegisterHighlightCommand: PROC [technology: CD.Technology ← NIL, contextCreator: ExtractContextCreator, prompt: Rope.ROPE, key: ATOM];
Create menu entry for extraction using a non-layout extractor (e.g. Sisyph). If technology is NIL, the entry will be valid for ALL technologies.
RegisterExtractCommand: PROC [technology: CD.Technology ← NIL, contextCreator: ExtractContextCreator, prompt: Rope.ROPE, key: ATOM];
END.