-- File: SVFiles.mesa
-- Last edited by Bier on December 18, 1982 1:21 am
-- Author: Eric Bier on October 6, 1982 2:53 pm
-- Contents: Interfaces which make creating scenes look like opening files.

DIRECTORY
 DisplayList3d,
 IO,
 Rope;

SVFiles: DEFINITIONS =
BEGIN

Scene: TYPE = DisplayList3d.Scene;
SceneTable: TYPE = LIST OF Scene;

OpenScene: PROC [picName: Rope.ROPE] RETURNS [scene: Scene, success: BOOL];
SaveScene: PROC [updatedScene: Scene, picName: Rope.ROPE] RETURNS [success: BOOL];
StoreScene: PROC [unNamedScene: Scene, newPicName: Rope.ROPE] RETURNS [success: BOOL];
FileExists: PROC [fileName: Rope.ROPE] RETURNS [answer: BOOL];
OpenFile: PROC [picName: Rope.ROPE] RETURNS [f: IO.STREAM, success: BOOL];
FilenameMinusExtension: PROC [wholeName: Rope.ROPE]
 RETURNS [firstPart: Rope.ROPE];
 
END.