File: RopeViewer.mesa
Copyright © 1984 by Xerox Corporation. All rights reserved.
Created by: Bob Mayo, August 5, 1984 8:17:50 pm PDT
Last Edited by: Mayo, August 9, 1984 5:54:44 pm PDT
-- Create a tioga viewer onto a rope, allow the user to edit it, and then return the new rope and destroy the viewer after he hits the save button.
DIRECTORY
Rope USING [ROPE];
RopeViewer:
CEDAR
DEFINITIONS =
BEGIN
-- create a viewer onto a rope, let the guy edit it, and return the new rope
Edit: PROC [contents, caption: Rope.ROPE ← NIL] RETURNS [Rope.ROPE];
END.