ftp.ee.pdx.edu/2014.02.ftp.ee.pdx.edu.tar/ftp.ee.pdx.edu/pub/users/Harry/compilers/p3/tst/forstmt.out.bak

Text File | 2005-10-24 | 462b | 113 lines

T1
integer
TYPE
T2
T
TYPE
T3
T2
TYPE
MyRec
f1
int
f2
MyRec
TYPE
a1
T1
nil
VAR
a2
T2
nil
VAR
a3
T3
nil
VAR
r
MyRec
nil
VAR
x
0
VAR
FOR
a1
11
1
TO
10
DO
x
ASSIGN
4444
ENDASSIGN
ENDFOR
FOR
a2
11
12
11
TO
20
DO
x
ASSIGN
5555
ENDASSIGN
ENDFOR
FOR
a3
11
12
13
21
TO
30
DO
x
ASSIGN
6666
ENDASSIGN
ENDFOR
FOR
r
f1
31
TO
40
DO
x
ASSIGN
7777
ENDASSIGN
ENDFOR
FOR
r
f2
f1
41
TO
50
DO
x
ASSIGN
8888
ENDASSIGN
ENDFOR
FOR
r
f2
f2
f1
51
TO
60
DO
x
ASSIGN
9999
ENDASSIGN
ENDFOR