37 lines
491 B
Plaintext
37 lines
491 B
Plaintext
PROC p (VAL INT x, y, INT z)
|
|
z := x + y
|
|
:
|
|
|
|
INT, INT FUNCTION two (VAL INT x)
|
|
INT FUNCTION inner.func (VAL INT q)
|
|
VALOF
|
|
SKIP
|
|
RESULT q - 1
|
|
:
|
|
VALOF
|
|
SKIP
|
|
RESULT inner.func (x), x + 1
|
|
:
|
|
|
|
INT FUNCTION f (VAL INT x, y)
|
|
INT q:
|
|
VALOF
|
|
SEQ
|
|
q := x
|
|
q := q + y
|
|
RESULT q
|
|
:
|
|
|
|
PROC test.expressions ()
|
|
INT a:
|
|
INT b:
|
|
INT c:
|
|
SEQ
|
|
a := 1
|
|
b := 2
|
|
c := 17 + f (a, b)
|
|
c := (42 * a) + (b - (72 / c))
|
|
b, c := two (a)
|
|
p (a, b, c)
|
|
:
|