DIRECTORY Rope USING [ROPE], Trc; TrcStandardClasses: CEDAR DEFINITIONS ~ BEGIN Class: TYPE ~ Trc.Class; ROPE: TYPE ~ Rope.ROPE; TRC: TYPE ~ Trc.TRC; Parm: TYPE ~ RECORD [name: ROPE, initialValue: REAL _ 0.5]; NewIdentityTrc: PUBLIC PROC RETURNS [trc: TRC]; NewChainTrc: PUBLIC PROC [dependents: LIST OF TRC] RETURNS [trc: TRC]; ReplaceNthTrcInChain: PUBLIC PROC [chain, new: TRC, n: NAT]; CreateParametricSubclass: PUBLIC PROC [flavor: ATOM, fcn: Trc.Fcn, blockFcn: Trc.BlockFcn, parms: LIST OF Parm, register: BOOL _ TRUE] RETURNS [class: Trc.Class]; NewParametricTrc: PUBLIC PROC [class: Class] RETURNS [trc: TRC]; EnumerateRegisteredParametricClasses: PROC [proc: Trc.ClassEnumProc]; END. τTrcStandardClasses.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Eric Nickell, April 7, 1986 3:00:24 pm PST Returns the values passed in. Enumerates the all the parametric classes which have been registered with Trc Κ}˜™Icodešœ Οmœ1™