CDCommands.mesa (part of Chipndale)
Copyright © 1984 by Xerox Corporation. All rights reserved.
by Christian Jacobi February 24, 1984 2:53 pm
last edited by Christian Jacobi November 2, 1984 9:31:44 am PST
DIRECTORY
CD,
Rope USING [ROPE];
CDCommands: CEDAR DEFINITIONS =
BEGIN
RenameDesign:
PROC [design:
CD.Design, name: Rope.
ROPE];
Select: PROC [design: CD.Design, pos: CD.DesignPosition, verbose: BOOL←TRUE];
DeSelect: PROC [design: CD.Design, pos: CD.DesignPosition, verbose: BOOL←TRUE];
SelectAll: PROC [design: CD.Design];
DeselectAll: PROC [design: CD.Design];
AreaSelect: PROC [design: CD.Design, area: CD.DesignRect, includePartial: BOOL←FALSE];
AreaDeSelect: PROC [design: CD.Design, area: CD.DesignRect, includePartial: BOOL←FALSE];
DeleteSelected: PROC [design: CD.Design, verbose: BOOL←TRUE];
DeletePointed: PROC [design: CD.Design, pos: CD.DesignPosition, verbose: BOOL←TRUE];
Undelete: PROC [design: CD.Design];
StretchyMode: TYPE = {yes, no, option};
MovePointed: PROC [design: CD.Design, offset: CD.DesignPosition, pos: CD.DesignPosition, stretchy: StretchyMode←no];
MoveSelected: PROC [design: CD.Design, offset: CD.DesignPosition, stretchy: StretchyMode←no];
CopyPointed: PROC [design: CD.Design, offset: CD.DesignPosition, pos: CD.DesignPosition];
CopySelected:
PROC [design:
CD.Design, offset:
CD.DesignPosition];
--the copied applications point to the original object instances
TransformSelected: PROC [design: CD.Design, transform: CD.Orientation];
TransformPointed: PROC [design: CD.Design, transform: CD.Orientation, pos: CD.DesignPosition];
BaseTransformSelected:
PROC [design:
CD.Design, transform:
CD.Orientation,
base: CD.DesignRect];
END.
--Remark
--All procedures do not queue; proper synchronization by the calle is assumed.