aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/correctness/psyntax.ml4
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/correctness/psyntax.ml4')
-rw-r--r--contrib/correctness/psyntax.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/correctness/psyntax.ml4 b/contrib/correctness/psyntax.ml4
index 59a32bafb..591076bdd 100644
--- a/contrib/correctness/psyntax.ml4
+++ b/contrib/correctness/psyntax.ml4
@@ -548,7 +548,7 @@ let _ =
if not (is_mutable v) then begin
let c =
Entries.ParameterEntry (trad_ml_type_v ren env v),
- Libnames.NeverDischarge in
+ Decl_kinds.IsAssumption Decl_kinds.Definitional in
List.iter
(fun id -> ignore (Declare.declare_constant id c)) ids;
if_verbose (is_assumed false) ids