diff options
| -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 *) |