aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/subtac/subtac_obligations.ml
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/subtac/subtac_obligations.ml')
-rw-r--r--plugins/subtac/subtac_obligations.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/subtac/subtac_obligations.ml b/plugins/subtac/subtac_obligations.ml
index b3ff7c9f0..74ee05bbc 100644
--- a/plugins/subtac/subtac_obligations.ml
+++ b/plugins/subtac/subtac_obligations.ml
@@ -213,7 +213,7 @@ let close sec =
(str (if List.length keys = 1 then " has " else "have ") ++
str "unsolved obligations"))
-let input =
+let input : program_info ProgMap.t -> obj =
declare_object
{ (default_object "Program state") with
cache_function = (fun (na, pi) -> from_prg := pi);