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