diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/safe_typing.ml | 3 | ||||
| -rw-r--r-- | kernel/term_typing.ml | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml index 7d49e452c9..35577239b4 100644 --- a/kernel/safe_typing.ml +++ b/kernel/safe_typing.ml @@ -193,7 +193,8 @@ type constraints_addition = let add_constraints cst senv = match cst with - | Later fc -> {senv with future_cst = fc :: senv.future_cst} + | Later fc -> + {senv with future_cst = fc :: senv.future_cst} | Now cst -> { senv with env = Environ.add_constraints cst senv.env; diff --git a/kernel/term_typing.ml b/kernel/term_typing.ml index 352ef40d90..a7f2125a7a 100644 --- a/kernel/term_typing.ml +++ b/kernel/term_typing.ml @@ -24,7 +24,7 @@ open Entries open Typeops open Fast_typeops -let debug = false +let debug = true let prerr_endline = if debug then prerr_endline else fun _ -> () |