X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=Test.obn;h=f76917867cb0d1bcb880b7e0cf655f116919947f;hb=757bfb90589d07922991e34a4cc36ef434c8e3bb;hp=babecff95eba9648125ff9e686de586d643d366e;hpb=95acec6c3ae8d3c324c84b001a680aa49320790b;p=dsw-obn.git diff --git a/Test.obn b/Test.obn index babecff..f769178 100644 --- a/Test.obn +++ b/Test.obn @@ -1,5 +1,12 @@ MODULE Test; +VAR + i : SHORTINT; + s : SET; + +PROCEDURE X; +END X; + BEGIN - ASSERT(ODD(5)); + i := SHORT(12345); END Test.