diff -r 00b2fd32305d -r 42382794b73f tools/PascalParser.hs
--- a/tools/PascalParser.hs	Thu Mar 29 01:01:29 2012 +0400
+++ b/tools/PascalParser.hs	Thu Mar 29 17:27:01 2012 +0400
@@ -288,7 +288,7 @@
             comments
             return ret
             else
-            return UnknownType
+            return VoidType
         char ';'
         comments
         forward <- liftM isJust $ optionMaybe (try (string "forward;") >> comments)