aboutsummaryrefslogtreecommitdiff
path: root/parsing
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-09-18 15:22:12 +0200
committerEmilio Jesus Gallego Arias2018-10-06 14:32:23 +0200
commit53870b7f6890a593d1da93706f3d020a79d226e5 (patch)
tree0f6e1afa1ca58611e6a12596ef10c88359b8045e /parsing
parent371566f7619aed79aad55ffed6ee0920b961be6e (diff)
[api] Remove (most) 8.9 deprecated objects.
A few of them will be of help for future cleanups. We have spared the stuff in `Names` due to bad organization of this module following the split from `Term`, which really difficult things removing the constructors.
Diffstat (limited to 'parsing')
-rw-r--r--parsing/cLexer.ml41
-rw-r--r--parsing/cLexer.mli2
-rw-r--r--parsing/pcoq.mli6
3 files changed, 0 insertions, 9 deletions
diff --git a/parsing/cLexer.ml4 b/parsing/cLexer.ml4
index d65b35c462..9c421f5b76 100644
--- a/parsing/cLexer.ml4
+++ b/parsing/cLexer.ml4
@@ -398,7 +398,6 @@ let set_lexer_state (o,s,b,c,f) =
current_file := f
let get_lexer_state () =
(!comment_begin, Buffer.contents current_comment, !between_commands, !comments, !current_file)
-let release_lexer_state = get_lexer_state
let drop_lexer_state () =
set_lexer_state (init_lexer_state Loc.ToplevelInput)
diff --git a/parsing/cLexer.mli b/parsing/cLexer.mli
index a14f08d91f..e4aa8debc1 100644
--- a/parsing/cLexer.mli
+++ b/parsing/cLexer.mli
@@ -54,7 +54,5 @@ type lexer_state
val init_lexer_state : Loc.source -> lexer_state
val set_lexer_state : lexer_state -> unit
val get_lexer_state : unit -> lexer_state
-val release_lexer_state : unit -> lexer_state
-[@@ocaml.deprecated "Use get_lexer_state"]
val drop_lexer_state : unit -> unit
val get_comment_state : lexer_state -> ((int * int) * string) list
diff --git a/parsing/pcoq.mli b/parsing/pcoq.mli
index c21f8f0d9a..c05229d576 100644
--- a/parsing/pcoq.mli
+++ b/parsing/pcoq.mli
@@ -23,12 +23,6 @@ module Gram : sig
include Grammar.S with type te = Tok.t
- type 'a entry = 'a Entry.e
- [@@ocaml.deprecated "Use [Pcoq.Entry.t]"]
-
- val entry_create : string -> 'a Entry.e
- [@@ocaml.deprecated "Use [Pcoq.Entry.create]"]
-
val gram_extend : 'a Entry.e -> 'a Extend.extend_statement -> unit
end with type 'a Entry.e = 'a Grammar.GMake(CLexer).Entry.e