const _scanner_actions = Int8[0, 1, 0, 1, 1, 1, 5, 1, 6, 1, 7, 2, 2, 3, 2, 2, 4, 0 , ] const _scanner_key_offsets = Int8[0, 3, 5, 0 , ] const _scanner_trans_keys = UInt8[99, 97, 98, 97, 98, 99, 97, 98, 0 , ] const _scanner_single_lengths = Int8[1, 2, 1, 0 , ] const _scanner_range_lengths = Int8[1, 0, 1, 0 , ] const _scanner_index_offsets = Int8[0, 3, 6, 0 , ] const _scanner_trans_cond_spaces = Int8[-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0 , ] const _scanner_trans_offsets = Int8[0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 0 , ] const _scanner_trans_lengths = Int8[1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0 , ] const _scanner_cond_keys = Int8[0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 , ] const _scanner_cond_targs = Int8[1, 0, 1, 2, 2, 1, 1, 0, 1, 1, 1, 0 , ] const _scanner_cond_actions = Int8[5, 0, 9, 11, 14, 7, 5, 0, 9, 9, 9, 0 , ] const _scanner_to_state_actions = Int8[0, 1, 0, 0 , ] const _scanner_from_state_actions = Int8[0, 3, 0, 0 , ] const _scanner_eof_trans_indexed = Int8[2, 0, 2, 0 , ] const _scanner_eof_trans_direct = Int8[10, 0, 11, 0 , ] const _scanner_nfa_targs = Int8[0, 0 , ] const _scanner_nfa_offsets = Int8[0, 0, 0, 0 , ] const _scanner_nfa_push_actions = Int8[0, 0 , ] const _scanner_nfa_pop_trans = Int8[0, 0 , ] const scanner_start = 1 const scanner_first_final = 1 const scanner_error = -1 const scanner_en_main = 1 function m( data::AbstractString ) p = 0 pe = length(data) eof = length(data) cs = 0 buffer = "" ts = 0; te = 0; act = 0; token = 0; cs = convert(Int, scanner_start ) ts = 0 te = 0 act = 0 _klen= 0 ; _trans = 0; _cond = 0; _have = 0; _cont = 1; _acts = 0; _nacts= 0 ; _keys = 0; _ckeys = 0; _cpc= 0 ; while _cont == 1 _have = 0 if p == pe if p == eof if _scanner_eof_trans_direct[1+(cs)]> 0 _trans = convert(UInt, _scanner_eof_trans_direct[1+(cs)] )- 1 _cond = convert(UInt, _scanner_trans_offsets[1+(_trans)] ) _have = 1 end if _have == 0 end end if _have == 0 _cont = 0 end end if _cont == 1 if _have == 0 _acts = _scanner_from_state_actions[1+(cs)] _nacts = convert(UInt, _scanner_actions[1+(_acts )] ) _acts += 1 while _nacts > 0 if _scanner_actions[1+(_acts )] == 1 { ts = p } end _nacts -= 1 _acts += 1 end _keys = _scanner_key_offsets[1+(cs)] _trans = convert(UInt, _scanner_index_offsets[1+(cs)] ) _have = 0 _klen = convert(Int, _scanner_single_lengths[1+(cs)] ) if _klen > 0 _lower = 0; _mid = 0; _upper = 0; _lower = _keys _upper = _keys + _klen - 1 while _upper >= _lower && _have == 0 _mid = _lower + ((_upper-_lower)>> 1) if (data[1+(p )])< _scanner_trans_keys[1+(_mid )] _upper = _mid - 1 elseif (data[1+(p )])> _scanner_trans_keys[1+(_mid )] _lower = _mid + 1 else _trans += convert(UInt, (_mid - _keys) ) _have = 1 end end if _have == 0 _keys += _klen _trans += convert(UInt, _klen ) end end if _have == 0 _klen = convert(Int, _scanner_range_lengths[1+(cs)] ) if _klen > 0 _lower = 0; _mid = 0; _upper = 0; _lower = _keys _upper = _keys + (_klen<<1)- 2 while _have == 0 && _lower <= _upper _mid = _lower + (((_upper-_lower)>> 1)& ~1) if (data[1+(p )])< _scanner_trans_keys[1+(_mid )] _upper = _mid - 2 elseif (data[1+(p )])> _scanner_trans_keys[1+(_mid + 1 )] _lower = _mid + 2 else _trans += convert(UInt, ((_mid - _keys)>>1) ) _have = 1 end end if _have == 0 _trans += convert(UInt, _klen ) end end end _ckeys = _scanner_trans_offsets[1+(_trans)] _klen = convert(Int, _scanner_trans_lengths[1+(_trans)] ) _cond = convert(UInt, _scanner_trans_offsets[1+(_trans)] ) _have = 0 _cpc = 0 _lower = 0; _mid = 0; _upper = 0; _lower = _ckeys _upper = _ckeys + _klen - 1 while _have == 0 && _lower <= _upper _mid = _lower + ((_upper-_lower)>> 1) if _cpc < convert(Int, _scanner_cond_keys[1+(_mid )] ) _upper = _mid - 1 elseif _cpc > convert(Int, _scanner_cond_keys[1+(_mid )] ) _lower = _mid + 1 else _cond += convert(UInt, (_mid - _ckeys) ) _have = 1 end end if _have == 0 cs = -1 _cont = 0 end end if _cont == 1 cs = convert(Int, _scanner_cond_targs[1+(_cond)] ) if _scanner_cond_actions[1+(_cond)]!= 0 _acts = _scanner_cond_actions[1+(_cond)] _nacts = convert(UInt, _scanner_actions[1+(_acts )] ) _acts += 1 while _nacts > 0 if _scanner_actions[1+(_acts )] == 2 { te = p+1 } elseif _scanner_actions[1+(_acts )] == 3 { act = 1 } elseif _scanner_actions[1+(_acts )] == 4 { act = 3 } elseif _scanner_actions[1+(_acts )] == 5 { te = p+1 print( "pat2\n" ); } elseif _scanner_actions[1+(_acts )] == 6 { te = p+1 } elseif _scanner_actions[1+(_acts )] == 7 { if act == 1 p = ((te))-1 print( "pat1\n" ); else p = ((te))-1 end } end _nacts -= 1 _acts += 1 end end _acts = _scanner_to_state_actions[1+(cs)] _nacts = convert(UInt, _scanner_actions[1+(_acts )] ) _acts += 1 while _nacts > 0 if _scanner_actions[1+(_acts )] == 0 { ts = 0 } end _nacts -= 1 _acts += 1 end if _cont == 1 p += 1 end end end end if ( cs >= scanner_first_final ) println( "ACCEPT" ); else println( "FAIL" ); end end m( "ba a" );