IndexViewer.mesa
Copyright
© 1985 by Xerox Corporation. All rights reserved.
Created by Rick Beach, July 6, 1983 5:28 pm
Rick Beach, March 30, 1985 11:58:40 pm PST
DIRECTORY
IndexToolPrivate,
Rope;
IndexViewer:
CEDAR
DEFINITIONS
=
BEGIN
OPEN IndexToolPrivate;
ROPE:
TYPE = Rope.
ROPE;
NewTool:
PROCEDURE [kindOfIndex:
ATOM, documentName:
ROPE]
RETURNS [indexHandle: IndexHandle ←
NEW[IndexHandleRec]];
END.