diff options
author | Jim Fehrle <jfehrle@sbcglobal.net> | 2018-02-21 16:04:06 -0800 |
---|---|---|
committer | Jim Fehrle <jfehrle@sbcglobal.net> | 2018-02-22 09:41:51 -0800 |
commit | 648483fe2ff3942b9f2f2cbbf7a0552b8e1997c4 (patch) | |
tree | 6f1274519a1f285205da750bbf85b7ebc8eef9c7 /parsing/cLexer.ml4 | |
parent | aec63ba9c8f6840d98ba731640a786138d836343 (diff) |
Rename release_lexer_state to the more descriptive get_lexer_state.
Diffstat (limited to 'parsing/cLexer.ml4')
-rw-r--r-- | parsing/cLexer.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/cLexer.ml4 b/parsing/cLexer.ml4 index f26398fa9..52a6fe16c 100644 --- a/parsing/cLexer.ml4 +++ b/parsing/cLexer.ml4 @@ -404,8 +404,9 @@ let set_lexer_state (o,s,b,c,f) = between_commands := b; comments := c; current_file := f -let release_lexer_state () = +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) |