diff -r b043665dea3d -r d45b6dbd2ad6 tools/PascalUnitSyntaxTree.hs
--- a/tools/PascalUnitSyntaxTree.hs	Tue Feb 07 22:39:36 2012 -0500
+++ b/tools/PascalUnitSyntaxTree.hs	Wed Feb 08 15:49:55 2012 +0400
@@ -105,7 +105,7 @@
     | BTArray BaseType BaseType
     | BTFunction
     | BTPointerTo BaseType
-    | BTSet
+    | BTSet BaseType
     | BTEnum [String]
     | BTVoid
     deriving Show