aboutsummaryrefslogtreecommitdiffhomepage
path: root/proofs/redexpr.ml
diff options
context:
space:
mode:
authorGravatar Guillaume Melquiond <guillaume.melquiond@inria.fr>2016-01-02 17:11:03 +0100
committerGravatar Guillaume Melquiond <guillaume.melquiond@inria.fr>2016-01-02 17:11:03 +0100
commit80bbdf335be5657f5ab33b4aa02e21420d341de2 (patch)
tree0fd5a807cecc57b6ce42c1b9a956d17f2ec5caeb /proofs/redexpr.ml
parent3f91296b5cf1dc9097d5368c2df5c6f70a04210c (diff)
Remove some unused functions.
Note: they do not even seem to have a debugging purpose, so better remove them before they bitrot.
Diffstat (limited to 'proofs/redexpr.ml')
-rw-r--r--proofs/redexpr.ml2
1 files changed, 0 insertions, 2 deletions
diff --git a/proofs/redexpr.ml b/proofs/redexpr.ml
index be92f2b04..89ecdb0df 100644
--- a/proofs/redexpr.ml
+++ b/proofs/redexpr.ml
@@ -158,8 +158,6 @@ let make_flag env f =
f.rConst red
in red
-let is_reference = function PRef _ | PVar _ -> true | _ -> false
-
(* table of custom reductino fonctions, not synchronized,
filled via ML calls to [declare_reduction] *)
let reduction_tab = ref String.Map.empty