Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Revu initialisation suite au changement de la strategie de reallocation 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4504 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 2002-03-11 10:38:43 +00:00
parent 5835791057
commit 6527f93cb0
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
stdlib/lexing.ml
View File

@ -86,11 +86,11 @@ let lex_refill read_fun aux_buffer lexbuf =
let from_function f =
{ refill_buff = lex_refill f (String.create 512);
lex_buffer = String.create 1024;
lex_buffer_end = 1024;
lex_abs_pos = - 1024;
lex_start_pos = 1024;
lex_curr_pos = 1024;
lex_last_pos = 1024;
lex_buffer_end = 0;
lex_abs_pos = 0;
lex_start_pos = 0;
lex_curr_pos = 0;
lex_last_pos = 0;
lex_last_action = 0;
lex_eof_reached = false }