diff options
Diffstat (limited to 'test/rlhc.d/case/url1.ml-O-F0--var-backend.exp')
| -rw-r--r-- | test/rlhc.d/case/url1.ml-O-F0--var-backend.exp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/rlhc.d/case/url1.ml-O-F0--var-backend.exp b/test/rlhc.d/case/url1.ml-O-F0--var-backend.exp index f5987a6a..73d61ec6 100644 --- a/test/rlhc.d/case/url1.ml-O-F0--var-backend.exp +++ b/test/rlhc.d/case/url1.ml-O-F0--var-backend.exp @@ -55,7 +55,7 @@ let _url_authority_char_class : int array = [| let _url_authority_index_offsets : int array = [| 0; 0; 10; 15; 20; 30; 35; 40; 50; 55; 60; 65; 70; 75; 80; 90; 100; 105; 110; 115; 120; 130; 140; 145; 150; 160; 170; 180; 184; 188; 198; 208; 210; 220; 230; 0 ; |] -let _url_authority_indicies : int array = [| +let _url_authority_indices : int array = [| 1; 0; 2; 0; 1; 1; 3; 0; 4; 1; 5; 1; 1; 1; 5; 6; 1; 1; 1; 6; 1; 7; 8; 7; 1; 1; 9; 7; 1; 1; 10; 1; 1; 1; 10; 11; 1; 1; 1; 11; 1; 3; 12; 3; 1; 1; 3; 3; 13; 1; 14; 1; 1; 1; 14; 15; 1; 1; 1; 15; 16; 1; 1; 1; 16; 17; 1; 1; 1; 17; 18; 1; 1; 1; 18; 19; 1; 1; 1; 19; 1; 20; 21; 20; 20; 1; 20; 20; 1; 1; 1; 22; 23; 22; 22; 1; 22; 22; 1; 24; 25; 1; 1; 1; 25; 26; 1; 1; 1; 26; 27; 1; 1; 1; 27; 28; 1; 1; 1; 28; 1; 29; 30; 29; 29; 1; 20; 29; 1; 1; 1; 31; 32; 31; 31; 1; 22; 31; 1; 33; 34; 1; 1; 1; 34; 35; 1; 1; 1; 35; 1; 36; 37; 36; 38; 39; 40; 36; 1; 1; 1; 41; 42; 43; 1; 44; 1; 41; 1; 1; 1; 45; 46; 45; 47; 39; 45; 45; 1; 1; 48; 49; 1; 44; 50; 51; 1; 52; 1; 53; 54; 53; 53; 53; 53; 53; 1; 1; 1; 19; 55; 19; 19; 19; 19; 19; 1; 1; 56; 57; 1; 7; 58; 59; 1; 52; 9; 7; 1; 1; 1; 3; 12; 3; 47; 39; 3; 3; 13; 1; 60; 57; 61; 0 ; |] let _url_authority_index_defaults : int array = [| @@ -317,7 +317,7 @@ begin let _ic : int ref = ref _url_authority_char_class.(( Char.code data.[p.contents] )- 0) in if _ic.contents<= _url_authority_trans_keys.( _keys.contents+1 )&& _ic.contents>= _url_authority_trans_keys.( _keys.contents ) then begin - _trans := _url_authority_indicies.( _inds.contents+ ( _ic.contents- _url_authority_trans_keys.( _keys.contents ) ) ); + _trans := _url_authority_indices.( _inds.contents+ ( _ic.contents- _url_authority_trans_keys.( _keys.contents ) ) ); end else @@ -504,7 +504,7 @@ let _url_char_class : int array = [| let _url_index_offsets : int array = [| 0; 0; 4; 13; 22; 28; 34; 40; 46; 52; 58; 64; 70; 71; 80; 84; 88; 97; 101; 105; 0 ; |] -let _url_indicies : int array = [| +let _url_indices : int array = [| 0; 0; 2; 2; 3; 1; 3; 4; 1; 5; 5; 3; 3; 1; 6; 1; 7; 6; 8; 6; 6; 1; 9; 1; 1; 9; 1; 9; 10; 1; 1; 10; 1; 10; 11; 1; 1; 11; 1; 11; 12; 1; 1; 12; 1; 12; 13; 1; 1; 13; 1; 13; 14; 1; 1; 14; 1; 14; 15; 1; 1; 15; 1; 15; 16; 1; 1; 16; 1; 16; 17; 1; 12; 18; 19; 12; 20; 12; 12; 21; 1; 22; 1; 23; 1; 24; 1; 25; 1; 26; 27; 28; 26; 26; 26; 26; 29; 1; 30; 31; 32; 1; 16; 33; 34; 1; 6; 35; 7; 6; 36; 6; 6; 37; 0 ; |] let _url_index_defaults : int array = [| @@ -675,7 +675,7 @@ begin let _ic : int ref = ref _url_char_class.(( Char.code data.[p.contents] )- 0) in if _ic.contents<= _url_trans_keys.( _keys.contents+1 )&& _ic.contents>= _url_trans_keys.( _keys.contents ) then begin - _trans := _url_indicies.( _inds.contents+ ( _ic.contents- _url_trans_keys.( _keys.contents ) ) ); + _trans := _url_indices.( _inds.contents+ ( _ic.contents- _url_trans_keys.( _keys.contents ) ) ); end else |