changeset 7019 | 333afe233886 |
parent 6967 | 1224c6fb36c3 |
child 7032 | 5685ca1ec9bf |
--- a/tools/PascalUnitSyntaxTree.hs Thu May 03 19:00:17 2012 +0200 +++ b/tools/PascalUnitSyntaxTree.hs Sat May 05 00:01:12 2012 +0400 @@ -105,7 +105,7 @@ | BTFloat | BTRecord [(String, BaseType)] | BTArray Range BaseType BaseType - | BTFunction BaseType + | BTFunction Int BaseType | BTFunctionReturn String BaseType | BTPointerTo BaseType | BTUnresolved String