X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=Test.obn;h=6fae5299c4ceb508ddf3708622d39e419e562a12;hb=9cc08bacbf56ebf49e17c8745ac6418fa4be1d0c;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.