X-Git-Url: https://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=Test.obn;h=6fae5299c4ceb508ddf3708622d39e419e562a12;hp=e4eeec3fd93e1dc48ac82f3e67accc672fd2131c;hb=317e2eb03b343f9d753990e6ed8386fd4effca60;hpb=6a3dfd4bef9a28863a7645070f0067f4a09d143a diff --git a/Test.obn b/Test.obn index e4eeec3..6fae529 100644 --- a/Test.obn +++ b/Test.obn @@ -1,15 +1,3 @@ MODULE Test; -TYPE - Rider = RECORD i : INTEGER END; - -PROCEDURE X; - VAR - r : Rider; -BEGIN - r.i := 666; -END X; - -BEGIN - X; END Test.