diff options
| author | letouzey | 2003-09-28 16:55:26 +0000 |
|---|---|---|
| committer | letouzey | 2003-09-28 16:55:26 +0000 |
| commit | 6f5e9f8048b3a14bc7246862b048673032bc4e06 (patch) | |
| tree | 3a5ace8b7e94ddc0514eb91f4151a205ae36310e | |
| parent | 48282f5a4a7a9cb598b4b1675fbb02050c3e3273 (diff) | |
oups
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4497 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 0886cc1619..7a95671b8f 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -297,7 +297,7 @@ let unbox = function (* Protects the convertibility test against undue exceptions when using it with untyped terms *) -let safe_pf_conv_x c1 c2 = try pf_conv_x c1 c2 with _ -> false +let safe_pf_conv_x gl c1 c2 = try pf_conv_x gl c1 c2 with _ -> false (* Add a Ring or a Semi-Ring to the database after a type verification *) |