diff options
Diffstat (limited to 'contrib/ring')
| -rw-r--r-- | contrib/ring/ring.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/ring/ring.ml b/contrib/ring/ring.ml index d72ee19e2c..2f42af6b71 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -806,8 +806,8 @@ let raw_polynom th op lc gl = c'''i; ci; c'i_eq_c''i |])))) (tclTHEN (tclORELSE - (Setoid_replace.setoid_replace ci c'''i ~new_goals:[]) - (Setoid_replace.setoid_replace c'''i ci ~new_goals:[])) + (Setoid_replace.setoid_replace None ci c'''i ~new_goals:[]) + (Setoid_replace.setoid_replace None c'''i ci ~new_goals:[])) (tclTHEN (tclTRY (h_exact c'i_eq_c''i)) tac))) |