diff options
author | Damien Doligez <damien.doligez-inria.fr> | 1997-05-19 15:42:21 +0000 |
---|---|---|
committer | Damien Doligez <damien.doligez-inria.fr> | 1997-05-19 15:42:21 +0000 |
commit | 03ec746bf1afc498c91a4bff3a3f80d873594b95 (patch) | |
tree | 2d628930d146a469503d32f62181997a75e459a3 /byterun/lexing.c | |
parent | 9f30d68f00c8933445d45416dcc7f67c7f1ca934 (diff) | |
download | ocaml-03ec746bf1afc498c91a4bff3a3f80d873594b95.tar.gz |
deTABisation
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1563 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/lexing.c')
-rw-r--r-- | byterun/lexing.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/byterun/lexing.c b/byterun/lexing.c index df7fdfe987..17dc0ad993 100644 --- a/byterun/lexing.c +++ b/byterun/lexing.c @@ -75,9 +75,9 @@ value lex_engine(tbl, start_state, lexbuf) /* ML */ /* See if we need a refill */ if (lexbuf->lex_curr_pos >= lexbuf->lex_buffer_len){ if (lexbuf->lex_eof_reached == Val_bool (0)){ - return Val_int(-state - 1); + return Val_int(-state - 1); }else{ - c = 256; + c = 256; } }else{ /* Read next input char */ @@ -99,7 +99,7 @@ value lex_engine(tbl, start_state, lexbuf) /* ML */ } }else{ /* Erase the EOF condition only if the EOF pseudo-character was - consumed by the automaton (i.e. there was no backtrack above) + consumed by the automaton (i.e. there was no backtrack above) */ if (c == 256) lexbuf->lex_eof_reached = Val_bool (0); } |