diff options
| author | Pierre-Marie Pédrot | 2018-10-07 19:19:11 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-10-07 19:19:11 +0200 |
| commit | 9a13a86115823a24738489f0b11b692f4ed065ad (patch) | |
| tree | 4b2dc62bab2cc85f841a84cbfadb7de5a5fbb532 /kernel/safe_typing.ml | |
| parent | d6d6291b4929bee8122d486aec15a57e5607ff18 (diff) | |
| parent | 53870b7f6890a593d1da93706f3d020a79d226e5 (diff) | |
Merge PR #8493: [api] Remove (most) 8.9 deprecated objects.
Diffstat (limited to 'kernel/safe_typing.ml')
| -rw-r--r-- | kernel/safe_typing.ml | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml index b03342da39..820c5b3a2b 100644 --- a/kernel/safe_typing.ml +++ b/kernel/safe_typing.ml @@ -883,12 +883,6 @@ let typing senv = Typeops.infer (env_of_senv senv) (** {6 Retroknowledge / native compiler } *) -[@@@ocaml.warning "-3"] -(** universal lifting, used for the "get" operations mostly *) -let retroknowledge f senv = - Environ.retroknowledge f (env_of_senv senv) -[@@@ocaml.warning "+3"] - let register field value senv = (* todo : value closed *) (* spiwack : updates the safe_env with the information that the register |