diff options
| author | sacerdot | 2004-07-23 14:05:23 +0000 |
|---|---|---|
| committer | sacerdot | 2004-07-23 14:05:23 +0000 |
| commit | 9ac8f94406c6d6f234795d114978bfd0652e9c3e (patch) | |
| tree | 63c049948b4eb487850ffac6aa576e23603c58fb | |
| parent | a637b4d1cd7876cb6601a303e69ba7847d42d47e (diff) | |
Setoid_replace.setoid_replace: last argument (that was supposed to be
always None) removed.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5969 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | contrib/ring/ring.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/ring/ring.ml b/contrib/ring/ring.ml index c15077a944..178b866de0 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -805,7 +805,7 @@ let raw_polynom th op lc gl = (unbox th.th_setoid_th); c'''i; ci; c'i_eq_c''i |])))) (tclTHEN - (Setoid_replace.setoid_replace ci c'''i None) + (Setoid_replace.setoid_replace ci c'''i) (tclTHEN (tclTRY (h_exact c'i_eq_c''i)) tac))) |