CDSimpleOps.mesa (part of ChipNDale)
Copyright © 1984, 1985 by Xerox Corporation. All rights reserved.
Created by Christian Jacobi, February 24, 1984 2:53 pm
Last edited by: Christian Jacobi, October 16, 1986 12:54:10 pm PDT
DIRECTORY
CD,
Rope USING [ROPE];
CDSimpleOps: CEDAR DEFINITIONS =
BEGIN
Implements some basic interactive commands.
All procedures do not queue; proper synchronization by the caller is assumed.
RenameDesign:
PUBLIC
PROC [design:
CD.Design, name: Rope.
ROPE]
RETURNS [done:
BOOL];
--renames a design; might fail!
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𡤀];
MoveSelected: PROC [design: CD.Design, offset: CD.Position];
CopySelected: PROC [design: CD.Design, offset: CD.Position];
TransformSelected:
PROC [design:
CD.Design, transform:
CD.Orientation, base:
CD.Rect←[0,0,-1,-1]];
--Transforms the selection such that:
--takes the base rectangle, transforms orientation and translates the transformed rectangle
--to fit its lower left point [after transformation] to be at the same point as the lower left
--point of the base rectangle before the transformation.
--If base is empty, use bbox of selection.
END.