<> <> DIRECTORY Rope USING[Text]; AtomPrivate: DEFINITIONS = BEGIN <> AtomRec: TYPE = RECORD[pName: Rope.Text, propList: REF ANY _ NIL, link: ATOM _ NIL]; <> UnsafeMakeAtom: PROC[pName: LONG POINTER TO READONLY TEXT] RETURNS[ATOM]; END.