SaffronGenericDef.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Generated by BJackson.pa at April 27, 1987 10:48:12 pm PDT
using ThreeCasabaFour [1.1] of April 14, 1987 6:34:07 pm PDT
DIRECTORY
Rope,
ThreeC4Support;
SaffronGenericDef: CEDAR DEFINITIONS =
BEGIN
OPEN Rope, ThreeC4Support;
SaffronGenericLinkProc: PROC[SeeProdLinkArray, TokenLinkArray];
decimalnum
decimalnumNode: TYPE = REF decimalnumNodeBody;
decimalnumNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
octalnum
octalnumNode: TYPE = REF octalnumNodeBody;
octalnumNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
hexnum
hexnumNode: TYPE = REF hexnumNodeBody;
hexnumNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
id
idNode: TYPE = REF idNodeBody;
idNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
string
stringNode: TYPE = REF stringNodeBody;
stringNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
flnum
flnumNode: TYPE = REF flnumNodeBody;
flnumNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
char
charNode: TYPE = REF charNodeBody;
charNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
atom
atomNode: TYPE = REF atomNodeBody;
atomNodeBody:
TYPE =
RECORD[
text: Rope.ROPE,
position, length: INT];
END..