diff options
Diffstat (limited to 'tactics/tacintern.ml')
-rw-r--r-- | tactics/tacintern.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/tactics/tacintern.ml b/tactics/tacintern.ml index 197caf3bd..6c9e20289 100644 --- a/tactics/tacintern.ml +++ b/tactics/tacintern.ml @@ -523,7 +523,6 @@ let rec intern_atomic lf ist x = (* Constructors *) | TacSplit (ev,bll) -> TacSplit (ev,List.map (intern_bindings ist) bll) - | TacConstructor (ev,n,bl) -> TacConstructor (ev,intern_or_var ist n,intern_bindings ist bl) (* Conversion *) | TacReduce (r,cl) -> |