CDSomeImplementors.mesa (part of ChipNDale)
Copyright © 1984, 1985 by Xerox Corporation. All rights reserved.
by Ch. Jacobi, September 10, 1984 9:20:09 am PDT
last edited by Ch. Jacobi, September 23, 1985 4:23:14 pm PDT
DIRECTORY
CD;
CDSomeImplementors: CEDAR DEFINITIONS =
BEGIN
implementing the origin
Object class implementors business; calling these procedures for other purposes (except if explicitely allowed by the comment of a procedure) will typically produce chaos. These procedure implement an origin feature by using properties.
SimpleGetOrigin: PRIVATE PROC[ob: CD.Object] RETURNS [CD.Position];
SimpleSetOrigin: PRIVATE PROC[ob: CD.Object, new: CD.Position];
--does NOT do any notification
END.