File: GGFileOut.mesa
Last edited by Bier on September 26, 1987 2:51:08 pm PDT
Copyright Ó 1986, 1987 by Xerox Corporation. All rights reserved.
Contents: Facilities for creating text files and writing out a human-readable version of a gargoyle object database
Pier, June 26, 1987 11:29:51 am PDT
Bier, October 31, 1988 3:27:33 pm PST
DIRECTORY
GGModelTypes, GGInterfaceTypes, IO, Rope;
GGFileOut: CEDAR DEFINITIONS = BEGIN
GGData: TYPE = GGInterfaceTypes.GGData;
Scene: TYPE = GGModelTypes.Scene;
FileoutSceneOnly:
PROC [f:
IO.
STREAM, scene: Scene, fileName: Rope.
ROPE];
Writes a description of a Gargoyle scene. The client must already have opened a STREAM onto a file. The fileName argument is just so FileoutSceneOnly can put the name of the file in the file.
FileoutSceneAndOptions:
PROC [f:
IO.
STREAM, ggData: GGData, fileName: Rope.
ROPE, scene: Scene ←
NIL];
Writes a description of a Gargoyle scene, and some of the user interface state into a file (including which alignments are selected and so forth). The client must already have opened a STREAM onto a file. The fileName argument is just so FileoutSceneOnly can put the name of the file in the file. If scene=NIL, the scene in ggData will be filed out.
END.