tools/PascalUnitSyntaxTree.hs
changeset 7042 de20086a6bcc
parent 7032 5685ca1ec9bf
child 7070 8d4189609e90
--- a/tools/PascalUnitSyntaxTree.hs	Thu May 10 22:55:13 2012 +0400
+++ b/tools/PascalUnitSyntaxTree.hs	Thu May 10 23:51:05 2012 +0400
@@ -103,7 +103,7 @@
     | BTInt
     | BTBool
     | BTFloat
-    | BTRecord [(String, BaseType)]
+    | BTRecord String [(String, BaseType)]
     | BTArray Range BaseType BaseType
     | BTFunction Int BaseType
     | BTPointerTo BaseType