X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=Test.obn;h=da60894a8f758fa1ea09b7ef7f8195caa7367b55;hb=dd188cb697c08d52aefb144a4f3a943dbf3388c5;hp=f76917867cb0d1bcb880b7e0cf655f116919947f;hpb=8c59e1e41700802575cefb289600028909c5ffc2;p=dsw-obn.git diff --git a/Test.obn b/Test.obn index f769178..da60894 100644 --- a/Test.obn +++ b/Test.obn @@ -1,12 +1,11 @@ MODULE Test; -VAR - i : SHORTINT; - s : SET; +PROCEDURE A; +END A; -PROCEDURE X; -END X; +PROCEDURE B; + PROCEDURE A; + END A; +END B; -BEGIN - i := SHORT(12345); END Test.