Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tools/pas2c/PascalUnitSyntaxTree.hs
changeset 10120 b7f632c12784
parent 10113 b26c2772e754
child 10129 cd2a64a1f4aa 
--- a/tools/pas2c/PascalUnitSyntaxTree.hs	Fri Feb 07 14:41:49 2014 +0400
+++ b/tools/pas2c/PascalUnitSyntaxTree.hs	Fri Feb 07 15:44:27 2014 +0400
@@ -26,6 +26,7 @@
     | RecordType [TypeVarDeclaration] (Maybe [[TypeVarDeclaration]])
     | PointerTo TypeDecl
     | String
+    | AString
     | Set TypeDecl
     | FunctionType TypeDecl [TypeVarDeclaration]
     | DeriveType InitExpression
@@ -100,6 +101,7 @@
 data BaseType = BTUnknown
     | BTChar
     | BTString
+    | BTAString
     | BTInt Bool -- second param indicates whether signed or not
     | BTBool
     | BTFloat
hedgewars