aboutsummaryrefslogtreecommitdiffhomepage
path: root/proofs/redexpr.ml
diff options
context:
space:
mode:
Diffstat (limited to 'proofs/redexpr.ml')
-rw-r--r--proofs/redexpr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/redexpr.ml b/proofs/redexpr.ml
index 47d468bd3..6da2c8c2f 100644
--- a/proofs/redexpr.ml
+++ b/proofs/redexpr.ml
@@ -79,7 +79,7 @@ let make_flag f =
in red
let is_reference c =
- try let r = reference_of_constr c in true with _ -> false
+ try let r = global_of_constr c in true with _ -> false
let red_expr_tab = ref Stringmap.empty