DEADSOFTWARE
GIT
/
REPO
/
FRED-BOY
Projects
/
dsw-obn.git
/ blob
ea2d143a6b9a4cd952a1d30505f5ff09d90616ea
[dsw-obn.git]
/
Test.obn
1
MODULE
Test
;
2
3
VAR
4
x
:
INTEGER
;
5
p
:
PROCEDURE
;
6
7
PROCEDURE
X
;
8
BEGIN
9
x
:=
1
;
10
x
:=
2
;
11
x
:=
3
;
12
p
13
END
X
;
14
15
BEGIN
16
X
;
17
END
Test
.