aboutsummaryrefslogtreecommitdiff
path: root/library/declare.ml
diff options
context:
space:
mode:
Diffstat (limited to 'library/declare.ml')
-rw-r--r--library/declare.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/declare.ml b/library/declare.ml
index 27aecfe73d..3627df7fe6 100644
--- a/library/declare.ml
+++ b/library/declare.ml
@@ -138,7 +138,7 @@ let cache_constant ((sp,kn),(cdt,dhyps,kind)) =
let discharged_hyps kn sechyps =
let (_,dir,_) = repr_kn kn in
let args = Array.to_list (instance_from_variable_context sechyps) in
- List.rev (List.map (Libnames.make_path dir) args)
+ List.rev_map (Libnames.make_path dir) args
let discharge_constant ((sp,kn),(cdt,dhyps,kind)) =
let con = constant_of_kn kn in