WalnutSchemaInternal.mesa
Willie-Sue, February 12, 1985 1:34:35 pm PST
Copyright © 1985 by Xerox Corporation. All rights reserved.
Last Edited by: Willie-Sue, January 4, 1985 9:04:13 am PST
(added to get the global part of the schema initialized)
DIRECTORY
DB USING [Segment, Version];
WalnutSchemaInternal:
CEDAR DEFINITIONS
= BEGIN
Procedures
InitializeGlobals:
PROC[segment:
DB.Segment, version:
DB.Version ← NewOrOld];
This procedure initializes the globals vars part of the database schema - we want the interface to say READONLY, so the module that implements the variables must do the setting and there are too many to do in ONE module.
END.