diff options
| author |  barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 13:29:45 +0000 |
|---|---|---|
| committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 13:29:45 +0000 |
| commit | 6274447373e7dc69234da3415f8d9c4d4b67ced2 (patch) | |
| tree | c2190c4f3ee24b87e49cec5927d02a77272ba42e /contrib | |
| parent | 9935f0d7ab63d31f7a4a8c05d90627dff41dabf8 (diff) | |
Nouveau Rewrite-in plus economique
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2507 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/ring/quote.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/ring/quote.ml b/contrib/ring/quote.ml index 10c05ec0e..669fd21c5 100644 --- a/contrib/ring/quote.ml +++ b/contrib/ring/quote.ml @@ -268,7 +268,7 @@ let compute_ivs gl f cs = (* The Cases predicate is a lambda; we assume no dependency *) let p = match kind_of_term p with - | Lambda (_,_,p) -> pop p + | Lambda (_,_,p) -> Termops.pop p | _ -> p in |