@@ -47,21 +47,21 @@ var caml_lex_engine_aux = (function (tbl, start_state, lexbuf, exn){
4747 var lex_trans = 'lex_trans' ;
4848 var lex_check = 'lex_check' ;
4949 if ( ! tbl . processed ) {
50- tbl . lex_base = caml_lex_array ( tbl [ lex_base ] ) ;
51- tbl . lex_backtrk = caml_lex_array ( tbl [ lex_backtrk ] ) ;
52- tbl . lex_check = caml_lex_array ( tbl [ lex_check ] ) ;
53- tbl . lex_trans = caml_lex_array ( tbl [ lex_trans ] ) ;
54- tbl . lex_default = caml_lex_array ( tbl [ lex_default ] ) ;
50+ tbl . lex_base = caml_lex_array ( tbl . lex_base ) ;
51+ tbl . lex_backtrk = caml_lex_array ( tbl . lex_backtrk ) ;
52+ tbl . lex_check = caml_lex_array ( tbl . lex_check ) ;
53+ tbl . lex_trans = caml_lex_array ( tbl . lex_trans ) ;
54+ tbl . lex_default = caml_lex_array ( tbl . lex_default ) ;
5555 tbl . processed = true ;
5656 }
5757 var c ;
5858 var state = start_state ;
59- //var buffer = bytes_of_string(lexbuf[ lex_buffer] );
60- var buffer = lexbuf [ lex_buffer ] ;
59+ //var buffer = bytes_of_string(lexbuf. lex_buffer);
60+ var buffer = lexbuf . lex_buffer ;
6161 if ( state >= 0 ) {
6262 /* First entry */
63- lexbuf [ lex_last_pos ] = lexbuf [ lex_start_pos ] = lexbuf [ lex_curr_pos ] ;
64- lexbuf [ lex_last_action ] = - 1 ;
63+ lexbuf . lex_last_pos = lexbuf . lex_start_pos = lexbuf . lex_curr_pos ;
64+ lexbuf . lex_last_action = - 1 ;
6565 }
6666 else {
6767 /* Reentry after refill */
@@ -75,20 +75,20 @@ var caml_lex_engine_aux = (function (tbl, start_state, lexbuf, exn){
7575 /* See if it's a backtrack point */
7676 var backtrk = tbl . lex_backtrk [ state ] ;
7777 if ( backtrk >= 0 ) {
78- lexbuf [ lex_last_pos ] = lexbuf [ lex_curr_pos ] ;
79- lexbuf [ lex_last_action ] = backtrk ;
78+ lexbuf . lex_last_pos = lexbuf . lex_curr_pos ;
79+ lexbuf . lex_last_action = backtrk ;
8080 }
8181 /* See if we need a refill */
82- if ( lexbuf [ lex_curr_pos ] >= lexbuf [ lex_buffer_len ] ) {
83- if ( lexbuf [ lex_eof_reached ] === 0 )
82+ if ( lexbuf . lex_curr_pos >= lexbuf . lex_buffer_len ) {
83+ if ( lexbuf . lex_eof_reached === 0 )
8484 return - state - 1 ;
8585 else
8686 c = 256 ;
8787 }
8888 else {
8989 /* Read next input char */
90- c = buffer [ lexbuf [ lex_curr_pos ] ] ;
91- lexbuf [ lex_curr_pos ] ++ ;
90+ c = buffer [ lexbuf . lex_curr_pos ] ;
91+ lexbuf . lex_curr_pos ++ ;
9292 }
9393 /* Determine next state */
9494 if ( tbl . lex_check [ base + c ] === state ) {
@@ -99,18 +99,18 @@ var caml_lex_engine_aux = (function (tbl, start_state, lexbuf, exn){
9999 }
100100 /* If no transition on this char, return to last backtrack point */
101101 if ( state < 0 ) {
102- lexbuf [ lex_curr_pos ] = lexbuf [ lex_last_pos ] ;
103- if ( lexbuf [ lex_last_action ] == - 1 )
102+ lexbuf . lex_curr_pos = lexbuf . lex_last_pos ;
103+ if ( lexbuf . lex_last_action == - 1 )
104104 throw exn
105105 else
106- return lexbuf [ lex_last_action ] ;
106+ return lexbuf . lex_last_action ;
107107 }
108108 else {
109109 /* Erase the EOF condition only if the EOF pseudo-character was
110110 consumed by the automaton (i.e. there was no backtrack above)
111111 */
112112 if ( c == 256 )
113- lexbuf [ lex_eof_reached ] = 0 ;
113+ lexbuf . lex_eof_reached = 0 ;
114114 }
115115 }
116116} ) ;
@@ -193,11 +193,11 @@ var caml_new_lex_engine_aux = (function (tbl, start_state, lexbuf, exn) {
193193 var lex_check_code = 'lex_check_code' ;
194194 var lex_code = 'lex_code' ;
195195 if ( ! tbl . processed ) {
196- tbl . lex_base = caml_lex_array ( tbl [ lex_base ] ) ;
197- tbl . lex_backtrk = caml_lex_array ( tbl [ lex_backtrk ] ) ;
198- tbl . lex_check = caml_lex_array ( tbl [ lex_check ] ) ;
199- tbl . lex_trans = caml_lex_array ( tbl [ lex_trans ] ) ;
200- tbl . lex_default = caml_lex_array ( tbl [ lex_default ] ) ;
196+ tbl . lex_base = caml_lex_array ( tbl . lex_base ) ;
197+ tbl . lex_backtrk = caml_lex_array ( tbl . lex_backtrk ) ;
198+ tbl . lex_check = caml_lex_array ( tbl . lex_check ) ;
199+ tbl . lex_trans = caml_lex_array ( tbl . lex_trans ) ;
200+ tbl . lex_default = caml_lex_array ( tbl . lex_default ) ;
201201 tbl . lex_base_code = caml_lex_array ( tbl [ lex_base_code ] ) ;
202202 tbl . lex_backtrk_code = caml_lex_array ( tbl [ lex_backtrk_code ] ) ;
203203 tbl . lex_check_code = caml_lex_array ( tbl [ lex_check_code ] ) ;
@@ -206,12 +206,12 @@ var caml_new_lex_engine_aux = (function (tbl, start_state, lexbuf, exn) {
206206 tbl . processed = true ;
207207 }
208208 var c , state = start_state ;
209- //var buffer = caml_bytes_of_string(lexbuf[ lex_buffer] );
210- var buffer = lexbuf [ lex_buffer ] ;
209+ //var buffer = caml_bytes_of_string(lexbuf. lex_buffer);
210+ var buffer = lexbuf . lex_buffer ;
211211 if ( state >= 0 ) {
212212 /* First entry */
213- lexbuf [ lex_last_pos ] = lexbuf [ lex_start_pos ] = lexbuf [ lex_curr_pos ] ;
214- lexbuf [ lex_last_action ] = - 1 ;
213+ lexbuf . lex_last_pos = lexbuf . lex_start_pos = lexbuf . lex_curr_pos ;
214+ lexbuf . lex_last_action = - 1 ;
215215 }
216216 else {
217217 /* Reentry after refill */
@@ -230,20 +230,20 @@ var caml_new_lex_engine_aux = (function (tbl, start_state, lexbuf, exn) {
230230 if ( backtrk >= 0 ) {
231231 var pc_off = tbl . lex_backtrk_code [ state ] ;
232232 caml_lex_run_tag ( tbl . lex_code , pc_off , lexbuf [ lex_mem ] ) ;
233- lexbuf [ lex_last_pos ] = lexbuf [ lex_curr_pos ] ;
234- lexbuf [ lex_last_action ] = backtrk ;
233+ lexbuf . lex_last_pos = lexbuf . lex_curr_pos ;
234+ lexbuf . lex_last_action = backtrk ;
235235 }
236236 /* See if we need a refill */
237- if ( lexbuf [ lex_curr_pos ] >= lexbuf [ lex_buffer_len ] ) {
238- if ( lexbuf [ lex_eof_reached ] == 0 )
237+ if ( lexbuf . lex_curr_pos >= lexbuf . lex_buffer_len ) {
238+ if ( lexbuf . lex_eof_reached == 0 )
239239 return - state - 1 ;
240240 else
241241 c = 256 ;
242242 }
243243 else {
244244 /* Read next input char */
245- c = buffer [ lexbuf [ lex_curr_pos ] ] ;
246- lexbuf [ lex_curr_pos ] ++ ;
245+ c = buffer [ lexbuf . lex_curr_pos ] ;
246+ lexbuf . lex_curr_pos ++ ;
247247 }
248248 /* Determine next state */
249249 var pstate = state ;
@@ -253,11 +253,11 @@ var caml_new_lex_engine_aux = (function (tbl, start_state, lexbuf, exn) {
253253 state = tbl . lex_default [ state ] ;
254254 /* If no transition on this char, return to last backtrack point */
255255 if ( state < 0 ) {
256- lexbuf [ lex_curr_pos ] = lexbuf [ lex_last_pos ] ;
257- if ( lexbuf [ lex_last_action ] == - 1 )
256+ lexbuf . lex_curr_pos = lexbuf . lex_last_pos ;
257+ if ( lexbuf . lex_last_action == - 1 )
258258 throw exn ;
259259 else
260- return lexbuf [ lex_last_action ] ;
260+ return lexbuf . lex_last_action ;
261261 }
262262 else {
263263 /* If some transition, get and perform memory moves */
@@ -267,12 +267,12 @@ var caml_new_lex_engine_aux = (function (tbl, start_state, lexbuf, exn) {
267267 else
268268 pc_off = tbl . lex_default_code [ pstate ] ;
269269 if ( pc_off > 0 )
270- caml_lex_run_mem ( tbl . lex_code , pc_off , lexbuf [ lex_mem ] , lexbuf [ lex_curr_pos ] ) ;
270+ caml_lex_run_mem ( tbl . lex_code , pc_off , lexbuf [ lex_mem ] , lexbuf . lex_curr_pos ) ;
271271 /* Erase the EOF condition only if the EOF pseudo-character was
272272 consumed by the automaton (i.e. there was no backtrack above)
273273 */
274274 if ( c == 256 )
275- lexbuf [ lex_eof_reached ] = 0 ;
275+ lexbuf . lex_eof_reached = 0 ;
276276 }
277277 }
278278 } ) ;
0 commit comments