ExampleGenericDef.mesa
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Generated by BJackson.pa at April 22, 1987 2:16:53 am PDT
using ThreeCasabaFour [1.1] of April 14, 1987 6:34:07 pm PDT
DIRECTORY
Rope,
ThreeC4Support;
ExampleGenericDef: CEDAR DEFINITIONS =
BEGIN
OPEN Rope, ThreeC4Support;
ExampleGenericLinkProc: PROC[SeeProdLinkArray, TokenLinkArray];
number
numberNode: TYPE = REF numberNodeBody;
numberNodeBody: TYPE = RECORD[
text: Rope.ROPE,
position, length: INT];
END..