home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.ee.pdx.edu
/
2014.02.ftp.ee.pdx.edu.tar
/
ftp.ee.pdx.edu
/
pub
/
users
/
Harry
/
compilers
/
p3
/
tst
/
expr3.out.bak
< prev
next >
Wrap
Text File
|
2005-10-24
|
407b
|
80 lines
x
integer
10
VAR
echo
q
integer
FORMAL
integer
PROCEDURE
WRITE
q
ENDWRITE
RETURN
q
ENDRETURN
WRITE
x
" "
x
unary-PLUS
" "
x
unary-MINUS
" "
x
x
PLUS
" "
x
x
MINUS
" "
x
x
STAR
" "
x
x
DIV
" "
x
x
MOD
ENDWRITE
WRITE
10
x
STAR
x
STAR
20
x
STAR
MINUS
30
PLUS
ENDWRITE
WRITE
echo
FUNCTION
1
ENDFUNCTION
echo
FUNCTION
2
ENDFUNCTION
PLUS
echo
FUNCTION
3
ENDFUNCTION
echo
FUNCTION
4
ENDFUNCTION
PLUS
PLUS
ENDWRITE