tools/PascalUnitSyntaxTree.hs
changeset 7333 520a16a14747
parent 7323 8490a4f439a5
child 7429 fcf13e40d6b6
--- a/tools/PascalUnitSyntaxTree.hs	Sat Jun 30 00:34:51 2012 +0400
+++ b/tools/PascalUnitSyntaxTree.hs	Sat Jun 30 01:09:31 2012 +0400
@@ -107,7 +107,7 @@
     | BTFloat
     | BTRecord String [(String, BaseType)]
     | BTArray Range BaseType BaseType
-    | BTFunction Int BaseType
+    | BTFunction Bool Int BaseType
     | BTPointerTo BaseType
     | BTUnresolved String
     | BTSet BaseType