--- a/tools/PascalUnitSyntaxTree.hs Sat Mar 24 19:57:06 2012 +0400 +++ b/tools/PascalUnitSyntaxTree.hs Sat Mar 24 21:19:50 2012 +0400 @@ -108,4 +108,5 @@ | BTSet BaseType | BTEnum [String] | BTVoid + | BTUnit deriving Show