DIRECTORY CD, Rope USING [ROPE]; CDSimpleOps: CEDAR DEFINITIONS = BEGIN RenameDesign: PROC [design: CD.Design, name: Rope.ROPE]; Select: PROC [design: CD.Design, pos: CD.Position, verbose: BOOL_TRUE]; DeSelect: PROC [design: CD.Design, pos: CD.Position, verbose: BOOL_TRUE]; SelectAll: PROC [design: CD.Design]; DeselectAll: PROC [design: CD.Design]; AreaSelect: PROC [design: CD.Design, area: CD.Rect, includePartial: BOOL_FALSE]; AreaDeSelect: PROC [design: CD.Design, area: CD.Rect, includePartial: BOOL_FALSE]; DeleteSelected: PROC [design: CD.Design, verbose: BOOL_TRUE]; FlushDeletedCache: PROC [design: CD.Design]; Undelete: PROC [design: CD.Design, n: INT_0]; StretchyMode: TYPE = {yes, no, option}; MoveSelected: PROC [design: CD.Design, offset: CD.Position, stretchy: StretchyMode_no]; CopySelected: PROC [design: CD.Design, offset: CD.Position]; TransformSelected: PROC [design: CD.Design, transform: CD.Orientation]; BaseTransformSelected: PROC [design: CD.Design, transform: CD.Orientation, base: CD.Rect]; END. žCDSimpleOps.mesa (part of ChipNDale) Copyright c 1984, 1985 by Xerox Corporation. All rights reserved. by Christian Jacobi, February 24, 1984 2:53 pm last edited by Christian Jacobi, March 14, 1986 3:37:28 pm PST Implements some basic interactive commands. All procedures do not queue; proper synchronization by the caller is assumed. --the copied instances point to the original object instances Κ ˜codešœ+™+Kšœ Οmœ7™BKšœ/™/Kšœ>™>K˜—šΟk ˜ Kšžœ˜Kšœžœžœ˜—K˜KšΠbl œžœž œ˜ Kšž˜K˜šœ+™+KšœM™M—K˜KšΟn œžœ žœžœ˜8K˜Kš  œžœ žœžœžœžœ˜GKš  œžœ žœžœžœžœ˜IKš  œžœ žœ ˜$Kš  œžœ žœ ˜&Kš   œžœ žœžœžœžœ˜PKš   œžœ žœžœžœžœ˜RK˜Kš  œžœ žœžœžœ˜=Kš œžœ žœ ˜,Kš œžœ žœ žœ˜-K˜Kšœžœ˜'Kš  œžœ žœžœ&˜Wš  œžœ žœžœ ˜