diff options
| author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2002-04-18 07:27:47 +0000 |
|---|---|---|
| committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2002-04-18 07:27:47 +0000 |
| commit | 0a8236066f945c6026337dd4ea9342a9034f7987 (patch) | |
| tree | fb63dbda5f249cabf8dea58695131d2e1bf31807 /byterun/lexing.c | |
| parent | 4b70ed64c47bb1a179f0cd58a5d78d1733c5dd54 (diff) | |
vive les methodes polymorphes!
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4694 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/lexing.c')
| -rw-r--r-- | byterun/lexing.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/byterun/lexing.c b/byterun/lexing.c index dab0a962f..ec44eb053 100644 --- a/byterun/lexing.c +++ b/byterun/lexing.c @@ -22,7 +22,7 @@ struct lexer_buffer { value refill_buff; value lex_buffer; - value lex_buffer_len; + value lex_buffer_end; value lex_abs_pos; value lex_start_pos; value lex_curr_pos; @@ -72,7 +72,7 @@ CAMLprim value lex_engine(struct lexing_table *tbl, value start_state, lexbuf->lex_last_action = Val_int(backtrk); } /* See if we need a refill */ - if (lexbuf->lex_curr_pos >= lexbuf->lex_buffer_len){ + if (lexbuf->lex_curr_pos >= lexbuf->lex_buffer_end){ if (lexbuf->lex_eof_reached == Val_bool (0)){ return Val_int(-state - 1); }else{ |