diff options
Diffstat (limited to 'ltac/tacinterp.ml')
| -rw-r--r-- | ltac/tacinterp.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/ltac/tacinterp.ml b/ltac/tacinterp.ml index 36a0336bc..62d0cc529 100644 --- a/ltac/tacinterp.ml +++ b/ltac/tacinterp.ml @@ -2101,7 +2101,6 @@ let interp_redexp env sigma r = let _ = let eval ty env sigma lfun arg = - let ty = EConstr.Unsafe.to_constr ty in let ist = { lfun = lfun; extra = TacStore.empty; } in if Genarg.has_type arg (glbwit wit_tactic) then let tac = Genarg.out_gen (glbwit wit_tactic) arg in |