AtomPrivate.mesa
Copyright
© 1985 by Xerox Corporation. All rights reserved.
Rovner, May 10, 1983 3:02 pm
Russ Atkinson (RRA) January 31, 1985 2:20:57 pm PST
Beach, February 22, 1985 11:08:14 am PST
Doug Wyatt, February 24, 1985 8:11:41 pm PST
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.