X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=Test.obn;h=f76917867cb0d1bcb880b7e0cf655f116919947f;hb=8c59e1e41700802575cefb289600028909c5ffc2;hp=8249fb77223116fd24082f63a7dba78821d98fe1;hpb=3cd41dedaffe60018890cbe66baea63691fe62e8;p=dsw-obn.git diff --git a/Test.obn b/Test.obn index 8249fb7..f769178 100644 --- a/Test.obn +++ b/Test.obn @@ -1,8 +1,12 @@ MODULE Test; -IMPORT Out; +VAR + i : SHORTINT; + s : SET; + +PROCEDURE X; +END X; BEGIN - Out.Open; - Out.String("Hello World!"); Out.Ln; + i := SHORT(12345); END Test.