TestHighlight.cm
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Barth, November 28, 1986 5:15:14 pm PST
Bertrand Serlet June 2, 1987 4:55:51 pm PDT
Install RawExtract
← &design ← PW.OpenDesign["TestHighlight"]
← &rootObject ← CDDirectory.Fetch[&design, "Test"]
← &mode ← SinixRawCMosB.mode
← &root ← Sinix.Extract[obj: &rootObject, mode: &mode, userData: NEW [INT ← 0]].result
-- Should highlight cha. Click proceed!
← TestHighlight.StaticCheckReportGeometrically[&mode.decoration, &design, &rootObject, &root]
← &mode ← PWCore.extractMode
← &root ← Sinix.Extract[obj: &rootObject, mode: &mode, userData: NEW [INT ← 0]].result
-- Should highlight cha. Click proceed!
← TestHighlight.StaticCheckReportGeometrically[&mode.decoration, &design, &rootObject, &root]