X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=src%2Fparser.mly;h=db709243570bf516a92bac839dcf2307fe35c401;hb=2d5b3813df7f7db3abf3bcbfe2c6a657f463c5ee;hp=347c0723b210229e3685f3b89d051798e40608f0;hpb=f36210fd16a8e4e4d6ecdd8825bf8b8307943472;p=goals.git

diff --git a/src/parser.mly b/src/parser.mly
index 347c072..db70924 100644
--- a/src/parser.mly
+++ b/src/parser.mly
@@ -140,7 +140,7 @@ pattern_param:
 expr:
     | ID params  { Ast.ECallGoal ($loc, $1, $2) }
     | ID         { Ast.EVar ($loc, $1) }
-    | TACTIC params { Ast.ETacticConstructor ($loc, $1, $2) }
+    | TACTIC params { Ast.ETacticCtor ($loc, $1, $2) }
     | STRING     { Ast.ESubsts ($loc, $1) }
     | LEFT_ARRAY barelist RIGHT_ARRAY { Ast.EList ($loc, $2) }
     ;