DEADSOFTWARE
GIT
/
REPO
/
FRED-BOY
Projects
/
dsw-obn.git
/ blob
02d960d8493ae6cc6b328eb48399740323946a50
[dsw-obn.git]
/
Test18C.obn
1
MODULE
Test18C
;
2
3
VAR
4
x
:
PROCEDURE
(
i
:
LONGREAL
);
5
6
BEGIN
7
x
:=
ABS
;
8
END
Test18C
.
9
10
Проверка процедурного типа
.
Тест должен проваливаться
.