PipalCDUI.mesa
Copyright Ó 1988 by Xerox Corporation. All rights reserved.
Created by Bertrand Serlet March 17, 1988 2:33:02 pm PST
Bertrand Serlet April 14, 1988 11:33:36 pm PDT
Inserting an object in the Design
Design: TYPE = REF DesignRec;
DesignRec: PRIVATE TYPE = CD.DesignRec;
Fetch: PROC [design: Design, name: Pipal.ROPE] RETURNS [object: Pipal.Object ← NIL];
CDToPProc:
TYPE =
PROC [cdobj:
CD.Object]
RETURNS [obj: Pipal.Object];