DIRECTORY CDProperties USING [CopyVal, InstallProcs, InternalPWriteProc, RegisterProperty], Properties USING [PutProp], TokenIO USING [WriteAtom], SXAtoms; SXAtomsImpl: CEDAR PROGRAM IMPORTS CDProperties, Properties, TokenIO EXPORTS SXAtoms = BEGIN spinifex: PUBLIC ATOM _ $Spinifex; spinifexErrorRect: PUBLIC ATOM _ $SXErrorMessage; spinifexPropagationChanged: PUBLIC ATOM _ $SXPropagationChanged; spinifexCircuitDescription: PUBLIC ATOM _ $SpinifexCircuitDescription; -- may not be changed, as its value is used by CDPropTool errorClient: PUBLIC ATOM _ $SpinifexErrorClient; thymePrint: PUBLIC ATOM _ $SXThymeProc; rosePrint: PUBLIC ATOM _ $SXRoseProc; crystalAttr: PUBLIC ATOM _ $SXCrystal; init: PUBLIC ATOM _ $SXInit; fini: PUBLIC ATOM _ $SXFini; export: PUBLIC ATOM _ $Export; analyzeSelected: PUBLIC ATOM _ $SXSel; analyzeAndThymeSelected: PUBLIC ATOM _ $SXThymeS; analyzeAndRoseSelected: PUBLIC ATOM _ $SXRoseS; highlightPointedNode: PUBLIC ATOM _ $SpinifexHighlightNodeP; highlightKeyboardCoordsNode: PUBLIC ATOM _ $SXHighlightNodeK; SignalName: PUBLIC ATOM _ $SignalName; InstanceName: PUBLIC ATOM _ $InstanceName; Rect: PUBLIC ATOM _ $Rect; Cell: PUBLIC ATOM _ $Cell; WriteERect: CDProperties.InternalPWriteProc = BEGIN TokenIO.WriteAtom [h, spinifexErrorRect] END; [] _ CDProperties.RegisterProperty [spinifex, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [spinifexCircuitDescription, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [analyzeAndThymeSelected, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [analyzeAndRoseSelected, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [spinifexErrorRect, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [thymePrint, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [rosePrint, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [init, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [fini, $LetMeDoIt]; [] _ CDProperties.RegisterProperty [errorClient, $LetMeDoIt]; CDProperties.InstallProcs [prop: spinifexErrorRect, procs: [makeCopy: CDProperties.CopyVal, internalWrite: WriteERect]]; CDProperties.InstallProcs [prop: spinifex, procs: [makeCopy: CDProperties.CopyVal]]; CDProperties.InstallProcs [prop~ errorClient, procs: [makeCopy: CDProperties.CopyVal]]; CDProperties.InstallProcs [spinifexCircuitDescription, [makeCopy: CDProperties.CopyVal, properties: Properties.PutProp[NIL, $ObjectsOnly, "TRUE"]]] END. ΆSXAtomsImpl.mesa Copyright c 1984, 1985 by Xerox Corporation. All rights reserved. Written by: Shand, June 7, 1984 1:39:57 am PDT Last Edited by: Shand, March 11, 1985 0:06:12 am PST Last Edited by: Spreitzer, January 14, 1985 7:43:17 pm PST Last Edited by: Jacobi, April 5, 1985 11:22:41 am PST Last edited by: Christian Jacobi, November 7, 1986 1:16:02 pm PST Last edited by: gbb March 21, 1986 4:38:15 pm PST Module Initialization Edited on March 7, 1985 7:33:00 pm PST, by Shand New ATOM changes to: spinifexPropagationChanged used to attach a Rope.ROPE to a ChipNDale cell which contains the rosemary structural description of a cell Edited on March 11, 1985 0:03:58 am PST, by Shand New ATOM changes to: highlightKeyboardCoordsNode used invoke HighLightNode command at Coords specified from keyboard rather than pointing, to be used in conjunction with Spinifex output files (which now contain represenative node coords). Edited on June 28, 1985 5:21:28 pm PDT, by Beretta Registers spinifexCircuitDescription for CDPropTool. Edited on July 8, 1985 4:22:32 pm PDT, by Beretta Aded new atom export. If an object has a property with this key and if the value is $TRUE and the cell is at the root of analysis, then the signal name of the node with this property is used as a parameter (port). changes to: export. Last edited by: gbb July 20, 1985 3:49:04 pm PDT ChipNDale atom SaveRect does no longer exist, DIRECTORY gbb July 31, 1985 6:34:59 pm PDT Added atoms for Core output. changes to: coreOut: new, analyzeAndCoreSelected: new. gbb November 24, 1985 4:06:19 pm PST Removed atoms for Core output. gbb March 15, 1986 3:48:56 pm PST Fixed atoms for node highlightening (incompatibility with ChipNDale) Κϊ˜code™Kšœ Οmœ7™BK™.K™4K™:K™5K™AK™1—code2šΟk ˜ Kšœ žœ?˜QKšœ žœ ˜Kšœžœ ˜Kšœ˜—šΡbln œžœž˜Lšžœ"˜)Lšžœ ˜—šž˜Lšœ žœžœ ˜"Kšœžœžœ˜1Kšœžœžœ˜@Kšœžœžœ Οc9˜€Kšœ žœžœ˜0Kšœ žœžœ˜'Kšœ žœžœ˜%Kšœ žœžœ˜&Kšœžœžœ ˜Kšœžœžœ ˜Kšœžœžœ ˜Lšœžœžœ ˜&Kšœžœžœ ˜1Kšœžœžœ ˜/Kšœžœžœ˜