tools/PascalUnitSyntaxTree.hs
changeset 6512 0df7f6697939
parent 6489 e1f0058cfedd
child 6618 2d3232069c4b
--- a/tools/PascalUnitSyntaxTree.hs	Tue Dec 06 22:05:59 2011 +0300
+++ b/tools/PascalUnitSyntaxTree.hs	Wed Dec 07 08:01:18 2011 +0300
@@ -5,7 +5,7 @@
 data PascalUnit =
     Program Identifier Implementation Phrase
     | Unit Identifier Interface Implementation (Maybe Initialize) (Maybe Finalize)
-    | System
+    | System [TypeVarDeclaration]
     deriving Show
 data Interface = Interface Uses TypesAndVars
     deriving Show