diff options
| author | Arnaud Spiwack | 2015-07-24 08:46:09 +0200 |
|---|---|---|
| committer | Arnaud Spiwack | 2015-09-25 10:41:41 +0200 |
| commit | e8bad8abc7be351a34fdf9770409bbab14bcd6a9 (patch) | |
| tree | 00ca0103024f39e5943dcce5a89e9283708ae323 /kernel/fast_typeops.mli | |
| parent | 8f64e84a3560bcf668b00ac93ab33542456a9bda (diff) | |
Propagate `Guarded` flag from syntax to kernel.
The path is quite a bit of a maze, this commit is not as simple as it ought to be. Something more robust than a boolean should be used here.
Diffstat (limited to 'kernel/fast_typeops.mli')
| -rw-r--r-- | kernel/fast_typeops.mli | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/kernel/fast_typeops.mli b/kernel/fast_typeops.mli index 90d9c55f16..98dbefad13 100644 --- a/kernel/fast_typeops.mli +++ b/kernel/fast_typeops.mli @@ -18,6 +18,6 @@ open Environ *) -val infer : env -> constr -> unsafe_judgment -val infer_v : env -> constr array -> unsafe_judgment array -val infer_type : env -> types -> unsafe_type_judgment +val infer : chkguard:bool -> env -> constr -> unsafe_judgment +val infer_v : chkguard:bool -> env -> constr array -> unsafe_judgment array +val infer_type : chkguard:bool -> env -> types -> unsafe_type_judgment |