diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/typing.ml | 2 | ||||
| -rw-r--r-- | kernel/typing.mli | 3 |
2 files changed, 5 insertions, 0 deletions
diff --git a/kernel/typing.ml b/kernel/typing.ml index 7cd127cf60..1fcf340f3b 100644 --- a/kernel/typing.ml +++ b/kernel/typing.ml @@ -421,6 +421,8 @@ let add_mind sp mie env = in add_mind sp mib (set_universes (universes env_arities') env) +let export = export +let import = import (*s Machines with information. *) diff --git a/kernel/typing.mli b/kernel/typing.mli index d9d410c542..0167c8cd9c 100644 --- a/kernel/typing.mli +++ b/kernel/typing.mli @@ -41,6 +41,9 @@ val lookup_mind : section_path -> 'a environment -> mutual_inductive_body val lookup_mind_specif : constr -> 'a environment -> mind_specif val lookup_meta : int -> 'a environment -> constr +val export : 'a environment -> string -> compiled_env +val import : compiled_env -> 'a environment -> 'a environment + (*s Typing without information. *) type judgment |