SiroccoCGDef.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Generated by BJackson.pa at August 26, 1987 3:38:05 pm PDT
using ThreeCasabaFour [1.2] of June 1, 1987 6:00:00 pm PDT
DIRECTORY
Rope,
ThreeC4Support;
SiroccoCGDef: CEDAR DEFINITIONS =
BEGIN
OPEN Rope, ThreeC4Support;
SiroccoCGLinkProc: PROC[SeeProdLinkArray, TokenLinkArray];
BaseTypeKind: TYPE = {bool, card16, card32, int16, int32, sink, source, string, unspec};
Generic: TYPE = {array, bool, card16, card32, choice, enum, error, int16, int32, proc, record, seq, sink, source, string, unspec};
ItemKind: TYPE = {type, const};
ValueKind: TYPE = {bool, constructor, grouping, negation, null, number, string, variant};
id
idNode: TYPE = REF idNodeBody;
idNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
decimal
decimalNode: TYPE = REF decimalNodeBody;
decimalNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
hex
hexNode: TYPE = REF hexNodeBody;
hexNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
octal
octalNode: TYPE = REF octalNodeBody;
octalNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
rope
ropeNode: TYPE = REF ropeNodeBody;
ropeNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
END..