-- File CIFExtUtilsDefs.mesa
-- Written by Martin Newell, June 1980
-- Last updated: July 8, 1980 4:49 PM

-- CIF Circuit Extractor utility procedures

DIRECTORY

CIFExtScanDefs: FROM "CIFExtScanDefs" USING [Edge];

CIFExtUtilsDefs: DEFINITIONS =

BEGIN

OPEN CIFExtScanDefs;

SetExtLayer: PUBLIC PROCEDURE[layer:CARDINAL, v0,v1,v2,v3: CARDINAL];

DrawNumber: PUBLIC PROCEDURE[layer: CARDINAL, n: LONG POINTER, x,y: REAL];

DrawString: PUBLIC PROCEDURE[s: STRING, x,y: REAL];

DrawTrap: PUBLIC PROCEDURE[left: Edge, ystart: REAL, right: Edge, yend: REAL, layer:
CARDINAL];

WriteLongDecimal: PROCEDURE[n: LONG CARDINAL];

Tag: PUBLIC PROCEDURE[this,that: STRING] RETURNS [STRING];

SortNames: PUBLIC PROCEDURE[fileName: STRING];

END.