X-Git-Url: https://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=Test.obn;h=f76917867cb0d1bcb880b7e0cf655f116919947f;hp=82fbedbbc7c705e6e6a7a46f3cfb2a2e3c34c7d2;hb=8c59e1e41700802575cefb289600028909c5ffc2;hpb=2985d77f3ee4af98761b28b4ce1e57582d8c8619

diff --git a/Test.obn b/Test.obn
index 82fbedb..f769178 100644
--- a/Test.obn
+++ b/Test.obn
@@ -4,6 +4,9 @@ VAR
   i : SHORTINT;
   s : SET;
 
+PROCEDURE X;
+END X;
+
 BEGIN
   i := SHORT(12345);
 END Test.