X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=Test.obn;h=6fae5299c4ceb508ddf3708622d39e419e562a12;hb=0a98f4783fa8f0a7c1aaaf3dbeaf0aec8f4652b9;hp=69389899cad06413cb1824a0829eef066767864d;hpb=023ef0d8349acdfe751bba1b50749361682f72ff;p=dsw-obn.git diff --git a/Test.obn b/Test.obn index 6938989..6fae529 100644 --- a/Test.obn +++ b/Test.obn @@ -1,23 +1,3 @@ MODULE Test; -TYPE - File* = POINTER TO Handle; - - Handle = RECORD END; - - Rider* = RECORD - eof* : BOOLEAN; - res* : LONGINT; - END; - -PROCEDURE Old*(name : ARRAY OF CHAR) : File; -BEGIN - RETURN NIL -END Old; - -PROCEDURE New*(name : ARRAY OF CHAR) : File; -BEGIN - RETURN NIL -END New; - END Test.