diff options
| author | Pierre-Marie Pédrot | 2018-11-24 17:34:04 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-12-05 17:57:45 +0100 |
| commit | d85a200cb8fca964bb7428ca6a607cfc9dc83c79 (patch) | |
| tree | fd4f504b295b98462987be3b080f417675010d52 | |
| parent | 7a4e5d8d246559e916f4bc34a12404104e941ad4 (diff) | |
Removing dead fields from Plexing.lexer.
| -rw-r--r-- | gramlib/plexing.ml | 2 | ||||
| -rw-r--r-- | gramlib/plexing.mli | 2 | ||||
| -rw-r--r-- | parsing/cLexer.ml | 1 |
3 files changed, 2 insertions, 3 deletions
diff --git a/gramlib/plexing.ml b/gramlib/plexing.ml index 3b158ebcc4..f99a3c2480 100644 --- a/gramlib/plexing.ml +++ b/gramlib/plexing.ml @@ -15,4 +15,4 @@ type 'te lexer = tok_removing : pattern -> unit; tok_match : pattern -> 'te -> string; tok_text : pattern -> string; - tok_comm : Loc.t list option } + } diff --git a/gramlib/plexing.mli b/gramlib/plexing.mli index e09188763c..eed4082e00 100644 --- a/gramlib/plexing.mli +++ b/gramlib/plexing.mli @@ -30,7 +30,7 @@ type 'te lexer = tok_removing : pattern -> unit; tok_match : pattern -> 'te -> string; tok_text : pattern -> string; - tok_comm : Loc.t list option } + } and 'te lexer_func = char Stream.t -> 'te Stream.t * location_function and location_function = int -> Loc.t (** The type of a function giving the location of a token in the diff --git a/parsing/cLexer.ml b/parsing/cLexer.ml index c327f8aa43..c2b7fa117d 100644 --- a/parsing/cLexer.ml +++ b/parsing/cLexer.ml @@ -763,7 +763,6 @@ let lexer = { | _ -> ()); Plexing.tok_removing = (fun _ -> ()); Plexing.tok_match = Tok.match_pattern; - Plexing.tok_comm = None; Plexing.tok_text = token_text } (** Terminal symbols interpretation *) |