<> XMesaCmplr10Defs1: DEFINITIONS = BEGIN i1: INTEGER = 1; i2: INTEGER; c1: CARDINAL =1; c2: CARDINAL; r1: REAL = 1.0; r2: REAL; char1: CHAR = 'a; char2: CHAR; b1: BOOLEAN = TRUE; b2: BOOLEAN; SimplRecord: TYPE = RECORD[ anInt: INTEGER Ŧ 9, aCard: CARDINAL Ŧ 9, aReal: REAL Ŧ 9.0, aChar: CHAR Ŧ 'j, aBool: BOOLEAN Ŧ TRUE]; iArray: TYPE = ARRAY [0..5] OF INTEGER; cArray: TYPE = ARRAY [0..5] OF CARDINAL; rArray: TYPE = ARRAY [0..5] OF REAL; charArray: TYPE = ARRAY [0..5] OF CHAR; bArray: TYPE = ARRAY [0..5] OF BOOLEAN; Geti: PROCEDURE RETURNS[INTEGER]; Getc: PROCEDURE RETURNS[CARDINAL]; Getr: PROCEDURE RETURNS[REAL]; Getchar: PROCEDURE RETURNS[CHAR]; Getb: PROCEDURE RETURNS[BOOLEAN]; END.. \ XMesaCmplr10Defs1.mesa 17-Aug-87 18:38:12 Jim Foote January 22, 1988 1:49:53 pm PST Ę˙•NewlineDelimiter ™J™*J™)J˜J˜ĄJ˜JšĪnœĪk œ˜ šž˜Jšœžœ˜Jšœžœ˜ Jšœžœ˜Jšœžœ˜ Jšœžœ˜Jšœžœ˜ Jšœžœ˜Jšœžœ˜ Jšœžœžœ˜Jšœžœ˜ J˜šœ žœžœ˜Jšœžœ˜Jšœžœ˜Jšœžœ˜Jšœžœ˜Jšœžœžœ˜J˜—Jš œžœžœžœžœ˜'Jš œžœžœžœžœ˜(Jš œžœžœžœžœ˜$Jš œ žœžœžœžœ˜'Jš œžœžœžœžœ˜'J˜Jšœž œžœžœ˜!Jšœž œžœžœ˜"Jšœž œžœžœ˜Jšœž œžœžœ˜!Jšœž œžœžœ˜!—Jšžœ˜—…—\ˇ