diff --git a/AST2.ml b/AST2.ml
index f8340a431..9b260c5e0 100644
--- a/AST2.ml
+++ b/AST2.ml
@@ -70,7 +70,7 @@ module O = struct
 
   and operator =
     Function    of var_name
-  | Construcor  of var_name
+  | Constructor of var_name
   | UpdateField of field_name
   | GetField    of field_name
   | Or | And | Lt | Leq | Gt | Geq | Equal | Neq | Cat | Cons | Add | Sub | Mult | Div | Mod