DIRECTORY PS; PSLanguagePrivate: CEDAR DEFINITIONS ~ BEGIN OPEN PS; OStack: TYPE ~ REF OStackRep; OStackRep: TYPE ~ RECORD [ count: ArrayIndex, array: Array ]; DictImpl: TYPE ~ REF DictImplRep; DictImplRep: TYPE ~ RECORD [ length, maxLength: INT, data: SEQUENCE mod: NAT OF DictNode ]; DictNode: TYPE ~ REF DictNodeRep; DictNodeRep: TYPE ~ RECORD [key: Any, val: Any, next: DictNode]; DStack: TYPE ~ REF DStackRep; DStackRep: TYPE ~ RECORD [ count: ArrayIndex, array: SEQUENCE size: ArrayIndex OF Dict ]; END. „PSLanguagePrivate.mesa Copyright Σ 1987 by Xerox Corporation. All rights reserved. Doug Wyatt, May 21, 1987 11:44:23 am PDT ΚG˜codešœ™Kšœ<™