CirioRopeHelper.mesa
Copyright Ó 1990, 1991 by Xerox Corporation. All rights reserved.
Sturgis: April 5, 1990 2:38 pm PDT
Spreitze, January 3, 1991 7:23 am PST
DIRECTORY
AtomPrivate USING [AtomRec],
Rope USING[ROPE, Text];
CirioRopeHelper: CEDAR PROGRAM =
This program should exist in every PCedar world that may become a Cirio target; Cirio determines the target world's ROPE and ATOM types by examining this module. It only needs type information from this module, so the values can be NIL. They actually are NIL because CirioRopeHelper gets bound into CedarCore, where REF literals are forbidden.
BEGIN
aRope: Rope.ROPE ¬ NIL;
aText: Rope.Text ¬ NIL;
anAtom: ATOM ¬ NIL;
anAtomRep: AtomPrivate.AtomRec ¬ [NIL, NIL, NIL];
END..