diff options
| author | herbelin | 2005-02-06 13:03:51 +0000 |
|---|---|---|
| committer | herbelin | 2005-02-06 13:03:51 +0000 |
| commit | a608c8e1bffa032ed67f6f2dd406017b6aca9eb9 (patch) | |
| tree | 5bb5097ecebd3d07d1749af17520a77f6d2b6a4a /contrib/ring | |
| parent | f937000d0093a1cae137753f6e73ec15561cb9df (diff) | |
Nettoyage et documentation de Library
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6692 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/ring')
| -rw-r--r-- | contrib/ring/quote.ml | 2 | ||||
| -rw-r--r-- | contrib/ring/ring.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/contrib/ring/quote.ml b/contrib/ring/quote.ml index 5a381b57c6..fb0e665263 100644 --- a/contrib/ring/quote.ml +++ b/contrib/ring/quote.ml @@ -385,7 +385,7 @@ let rec sort_subterm gl l = [gl: goal sigma]\\ *) let quote_terms ivs lc gl = - Library.check_required_library ["Coq";"ring";"Quote"]; + Coqlib.check_required_library ["Coq";"ring";"Quote"]; let varhash = (Hashtbl.create 17 : (constr, constr) Hashtbl.t) in let varlist = ref ([] : constr list) in (* list of variables *) let counter = ref 1 in (* number of variables created + 1 *) diff --git a/contrib/ring/ring.ml b/contrib/ring/ring.ml index 384784fdc5..d3068c862a 100644 --- a/contrib/ring/ring.ml +++ b/contrib/ring/ring.ml @@ -885,7 +885,7 @@ let match_with_equiv c = match (kind_of_term c) with | _ -> None let polynom lc gl = - Library.check_required_library ["Coq";"ring";"Ring"]; + Coqlib.check_required_library ["Coq";"ring";"Ring"]; match lc with (* If no argument is given, try to recognize either an equality or a declared relation with arguments c1 ... cn, |