File: SVFiles.mesa
Last edited by Bier on June 1, 1984 5:19:46 pm PDT
Author: Eric Bier on March 1, 1987 5:52:39 pm PST
Contents: Interfaces which make creating scenes look like opening files.
DIRECTORY
AtomButtonsTypes, IO, Rope, SVSceneTypes, ViewerClasses;
SVFiles: CEDAR DEFINITIONS =
BEGIN
FeedbackData: TYPE = AtomButtonsTypes.FeedbackData;
Scene: TYPE = SVSceneTypes.Scene;
SceneTable: TYPE = LIST OF Scene;
Viewer: TYPE = ViewerClasses.Viewer;
OpenScene: PROC [picName: Rope.ROPE, wdirForAIS: Rope.ROPE, feedback: FeedbackData] RETURNS [scene: Scene, success: BOOL];
SaveScene: PROC [updatedScene: Scene, picName: Rope.ROPE, feedback: FeedbackData] RETURNS [success: BOOL];
StoreScene: PROC [unNamedScene: Scene, newPicName: Rope.ROPE, feedback: FeedbackData] RETURNS [success: BOOL];
FileExists: PROC [fileName: Rope.ROPE] RETURNS [answer: BOOL];
OpenFile: PROC [picName: Rope.ROPE, feedback: FeedbackData] RETURNS [f: IO.STREAM, success: BOOL];
FilenameMinusExtension: PROC [wholeName: Rope.ROPE] RETURNS [firstPart: Rope.ROPE];
END.