Packages

XQuery 3.1 Processor and XMl Database

Current section

Files

Jump to
xqerl src xqldb_json_scanner.erl
Raw

src/xqldb_json_scanner.erl

-file("/usr/local/Cellar/erlang/24.1.2/lib/erlang/lib/parsetools-2.3.1/include/leexinc.hrl", 0).
%% The source of this file is part of leex distribution, as such it
%% has the same Copyright as the other files in the leex
%% distribution. The Copyright is defined in the accompanying file
%% COPYRIGHT. However, the resultant scanner generated by leex is the
%% property of the creator of the scanner and is not covered by that
%% Copyright.
-module(xqldb_json_scanner).
-export([string/1, string/2, token/2, token/3, tokens/2, tokens/3]).
-export([format_error/1]).
%% User code. This is placed here to allow extra attributes.
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 37).
-file("/usr/local/Cellar/erlang/24.1.2/lib/erlang/lib/parsetools-2.3.1/include/leexinc.hrl", 14).
format_error({illegal, S}) -> ["illegal characters ", io_lib:write_string(S)];
format_error({user, S}) -> S.
string(String) -> string(String, 1).
string(String, Line) -> string(String, Line, String, []).
%% string(InChars, Line, TokenChars, Tokens) ->
%% {ok,Tokens,Line} | {error,ErrorInfo,Line}.
%% Note the line number going into yystate, L0, is line of token
%% start while line number returned is line of token end. We want line
%% of token start.
% No partial tokens!
string([], L, [], Ts) ->
{ok, yyrev(Ts), L};
string(Ics0, L0, Tcs, Ts) ->
case yystate(yystate(), Ics0, L0, 0, reject, 0) of
% Accepting end state
{A, Alen, Ics1, L1} ->
string_cont(Ics1, L1, yyaction(A, Alen, Tcs, L0), Ts);
% Accepting transistion state
{A, Alen, Ics1, L1, _S1} ->
string_cont(Ics1, L1, yyaction(A, Alen, Tcs, L0), Ts);
% After a non-accepting state
{reject, _Alen, Tlen, _Ics1, L1, _S1} ->
{error, {L0, ?MODULE, {illegal, yypre(Tcs, Tlen + 1)}}, L1};
{A, Alen, Tlen, _Ics1, L1, _S1} ->
Tcs1 = yysuf(Tcs, Alen),
L2 = adjust_line(Tlen, Alen, Tcs1, L1),
string_cont(Tcs1, L2, yyaction(A, Alen, Tcs, L0), Ts)
end.
%% string_cont(RestChars, Line, Token, Tokens)
%% Test for and remove the end token wrapper. Push back characters
%% are prepended to RestChars.
-dialyzer({nowarn_function, string_cont/4}).
string_cont(Rest, Line, {token, T}, Ts) ->
string(Rest, Line, Rest, [T | Ts]);
string_cont(Rest, Line, {token, T, Push}, Ts) ->
NewRest = Push ++ Rest,
string(NewRest, Line, NewRest, [T | Ts]);
string_cont(Rest, Line, {end_token, T}, Ts) ->
string(Rest, Line, Rest, [T | Ts]);
string_cont(Rest, Line, {end_token, T, Push}, Ts) ->
NewRest = Push ++ Rest,
string(NewRest, Line, NewRest, [T | Ts]);
string_cont(Rest, Line, skip_token, Ts) ->
string(Rest, Line, Rest, Ts);
string_cont(Rest, Line, {skip_token, Push}, Ts) ->
NewRest = Push ++ Rest,
string(NewRest, Line, NewRest, Ts);
string_cont(_Rest, Line, {error, S}, _Ts) ->
{error, {Line, ?MODULE, {user, S}}, Line}.
%% token(Continuation, Chars) ->
%% token(Continuation, Chars, Line) ->
%% {more,Continuation} | {done,ReturnVal,RestChars}.
%% Must be careful when re-entering to append the latest characters to the
%% after characters in an accept. The continuation is:
%% {token,State,CurrLine,TokenChars,TokenLen,TokenLine,AccAction,AccLen}
token(Cont, Chars) -> token(Cont, Chars, 1).
token([], Chars, Line) ->
token(yystate(), Chars, Line, Chars, 0, Line, reject, 0);
token({token, State, Line, Tcs, Tlen, Tline, Action, Alen}, Chars, _) ->
token(State, Chars, Line, Tcs ++ Chars, Tlen, Tline, Action, Alen).
%% token(State, InChars, Line, TokenChars, TokenLen, TokenLine,
%% AcceptAction, AcceptLen) ->
%% {more,Continuation} | {done,ReturnVal,RestChars}.
%% The argument order is chosen to be more efficient.
token(S0, Ics0, L0, Tcs, Tlen0, Tline, A0, Alen0) ->
case yystate(S0, Ics0, L0, Tlen0, A0, Alen0) of
%% Accepting end state, we have a token.
{A1, Alen1, Ics1, L1} ->
token_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline));
%% Accepting transition state, can take more chars.
% Need more chars to check
{A1, Alen1, [], L1, S1} ->
{more, {token, S1, L1, Tcs, Alen1, Tline, A1, Alen1}};
% Take what we got
{A1, Alen1, Ics1, L1, _S1} ->
token_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline));
%% After a non-accepting state, maybe reach accept state later.
% Need more chars to check
{A1, Alen1, Tlen1, [], L1, S1} ->
{more, {token, S1, L1, Tcs, Tlen1, Tline, A1, Alen1}};
% No token match
{reject, _Alen1, Tlen1, eof, L1, _S1} ->
%% Check for partial token which is error.
Ret =
if
Tlen1 > 0 ->
{error,
{Tline, ?MODULE,
%% Skip eof tail in Tcs.
{illegal, yypre(Tcs, Tlen1)}},
L1};
true ->
{eof, L1}
end,
{done, Ret, eof};
% No token match
{reject, _Alen1, Tlen1, Ics1, L1, _S1} ->
Error = {Tline, ?MODULE, {illegal, yypre(Tcs, Tlen1 + 1)}},
{done, {error, Error, L1}, Ics1};
% Use last accept match
{A1, Alen1, Tlen1, _Ics1, L1, _S1} ->
Tcs1 = yysuf(Tcs, Alen1),
L2 = adjust_line(Tlen1, Alen1, Tcs1, L1),
token_cont(Tcs1, L2, yyaction(A1, Alen1, Tcs, Tline))
end.
%% token_cont(RestChars, Line, Token)
%% If we have a token or error then return done, else if we have a
%% skip_token then continue.
-dialyzer({nowarn_function, token_cont/3}).
token_cont(Rest, Line, {token, T}) ->
{done, {ok, T, Line}, Rest};
token_cont(Rest, Line, {token, T, Push}) ->
NewRest = Push ++ Rest,
{done, {ok, T, Line}, NewRest};
token_cont(Rest, Line, {end_token, T}) ->
{done, {ok, T, Line}, Rest};
token_cont(Rest, Line, {end_token, T, Push}) ->
NewRest = Push ++ Rest,
{done, {ok, T, Line}, NewRest};
token_cont(Rest, Line, skip_token) ->
token(yystate(), Rest, Line, Rest, 0, Line, reject, 0);
token_cont(Rest, Line, {skip_token, Push}) ->
NewRest = Push ++ Rest,
token(yystate(), NewRest, Line, NewRest, 0, Line, reject, 0);
token_cont(Rest, Line, {error, S}) ->
{done, {error, {Line, ?MODULE, {user, S}}, Line}, Rest}.
%% tokens(Continuation, Chars, Line) ->
%% {more,Continuation} | {done,ReturnVal,RestChars}.
%% Must be careful when re-entering to append the latest characters to the
%% after characters in an accept. The continuation is:
%% {tokens,State,CurrLine,TokenChars,TokenLen,TokenLine,Tokens,AccAction,AccLen}
%% {skip_tokens,State,CurrLine,TokenChars,TokenLen,TokenLine,Error,AccAction,AccLen}
tokens(Cont, Chars) -> tokens(Cont, Chars, 1).
tokens([], Chars, Line) ->
tokens(yystate(), Chars, Line, Chars, 0, Line, [], reject, 0);
tokens({tokens, State, Line, Tcs, Tlen, Tline, Ts, Action, Alen}, Chars, _) ->
tokens(State, Chars, Line, Tcs ++ Chars, Tlen, Tline, Ts, Action, Alen);
tokens({skip_tokens, State, Line, Tcs, Tlen, Tline, Error, Action, Alen}, Chars, _) ->
skip_tokens(State, Chars, Line, Tcs ++ Chars, Tlen, Tline, Error, Action, Alen).
%% tokens(State, InChars, Line, TokenChars, TokenLen, TokenLine, Tokens,
%% AcceptAction, AcceptLen) ->
%% {more,Continuation} | {done,ReturnVal,RestChars}.
tokens(S0, Ics0, L0, Tcs, Tlen0, Tline, Ts, A0, Alen0) ->
case yystate(S0, Ics0, L0, Tlen0, A0, Alen0) of
%% Accepting end state, we have a token.
{A1, Alen1, Ics1, L1} ->
tokens_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Ts);
%% Accepting transition state, can take more chars.
% Need more chars to check
{A1, Alen1, [], L1, S1} ->
{more, {tokens, S1, L1, Tcs, Alen1, Tline, Ts, A1, Alen1}};
% Take what we got
{A1, Alen1, Ics1, L1, _S1} ->
tokens_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Ts);
%% After a non-accepting state, maybe reach accept state later.
% Need more chars to check
{A1, Alen1, Tlen1, [], L1, S1} ->
{more, {tokens, S1, L1, Tcs, Tlen1, Tline, Ts, A1, Alen1}};
% No token match
{reject, _Alen1, Tlen1, eof, L1, _S1} ->
%% Check for partial token which is error, no need to skip here.
Ret =
if
Tlen1 > 0 ->
{error,
{Tline, ?MODULE,
%% Skip eof tail in Tcs.
{illegal, yypre(Tcs, Tlen1)}},
L1};
Ts == [] ->
{eof, L1};
true ->
{ok, yyrev(Ts), L1}
end,
{done, Ret, eof};
{reject, _Alen1, Tlen1, _Ics1, L1, _S1} ->
%% Skip rest of tokens.
Error = {L1, ?MODULE, {illegal, yypre(Tcs, Tlen1 + 1)}},
skip_tokens(yysuf(Tcs, Tlen1 + 1), L1, Error);
{A1, Alen1, Tlen1, _Ics1, L1, _S1} ->
Token = yyaction(A1, Alen1, Tcs, Tline),
Tcs1 = yysuf(Tcs, Alen1),
L2 = adjust_line(Tlen1, Alen1, Tcs1, L1),
tokens_cont(Tcs1, L2, Token, Ts)
end.
%% tokens_cont(RestChars, Line, Token, Tokens)
%% If we have an end_token or error then return done, else if we have
%% a token then save it and continue, else if we have a skip_token
%% just continue.
-dialyzer({nowarn_function, tokens_cont/4}).
tokens_cont(Rest, Line, {token, T}, Ts) ->
tokens(yystate(), Rest, Line, Rest, 0, Line, [T | Ts], reject, 0);
tokens_cont(Rest, Line, {token, T, Push}, Ts) ->
NewRest = Push ++ Rest,
tokens(yystate(), NewRest, Line, NewRest, 0, Line, [T | Ts], reject, 0);
tokens_cont(Rest, Line, {end_token, T}, Ts) ->
{done, {ok, yyrev(Ts, [T]), Line}, Rest};
tokens_cont(Rest, Line, {end_token, T, Push}, Ts) ->
NewRest = Push ++ Rest,
{done, {ok, yyrev(Ts, [T]), Line}, NewRest};
tokens_cont(Rest, Line, skip_token, Ts) ->
tokens(yystate(), Rest, Line, Rest, 0, Line, Ts, reject, 0);
tokens_cont(Rest, Line, {skip_token, Push}, Ts) ->
NewRest = Push ++ Rest,
tokens(yystate(), NewRest, Line, NewRest, 0, Line, Ts, reject, 0);
tokens_cont(Rest, Line, {error, S}, _Ts) ->
skip_tokens(Rest, Line, {Line, ?MODULE, {user, S}}).
%%skip_tokens(InChars, Line, Error) -> {done,{error,Error,Line},Ics}.
%% Skip tokens until an end token, junk everything and return the error.
skip_tokens(Ics, Line, Error) ->
skip_tokens(yystate(), Ics, Line, Ics, 0, Line, Error, reject, 0).
%% skip_tokens(State, InChars, Line, TokenChars, TokenLen, TokenLine, Tokens,
%% AcceptAction, AcceptLen) ->
%% {more,Continuation} | {done,ReturnVal,RestChars}.
skip_tokens(S0, Ics0, L0, Tcs, Tlen0, Tline, Error, A0, Alen0) ->
case yystate(S0, Ics0, L0, Tlen0, A0, Alen0) of
% Accepting end state
{A1, Alen1, Ics1, L1} ->
skip_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Error);
% After an accepting state
{A1, Alen1, [], L1, S1} ->
{more, {skip_tokens, S1, L1, Tcs, Alen1, Tline, Error, A1, Alen1}};
{A1, Alen1, Ics1, L1, _S1} ->
skip_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Error);
% After a non-accepting state
{A1, Alen1, Tlen1, [], L1, S1} ->
{more, {skip_tokens, S1, L1, Tcs, Tlen1, Tline, Error, A1, Alen1}};
{reject, _Alen1, _Tlen1, eof, L1, _S1} ->
{done, {error, Error, L1}, eof};
{reject, _Alen1, Tlen1, _Ics1, L1, _S1} ->
skip_tokens(yysuf(Tcs, Tlen1 + 1), L1, Error);
{A1, Alen1, Tlen1, _Ics1, L1, _S1} ->
Token = yyaction(A1, Alen1, Tcs, Tline),
Tcs1 = yysuf(Tcs, Alen1),
L2 = adjust_line(Tlen1, Alen1, Tcs1, L1),
skip_cont(Tcs1, L2, Token, Error)
end.
%% skip_cont(RestChars, Line, Token, Error)
%% Skip tokens until we have an end_token or error then return done
%% with the original rror.
-dialyzer({nowarn_function, skip_cont/4}).
skip_cont(Rest, Line, {token, _T}, Error) ->
skip_tokens(yystate(), Rest, Line, Rest, 0, Line, Error, reject, 0);
skip_cont(Rest, Line, {token, _T, Push}, Error) ->
NewRest = Push ++ Rest,
skip_tokens(yystate(), NewRest, Line, NewRest, 0, Line, Error, reject, 0);
skip_cont(Rest, Line, {end_token, _T}, Error) ->
{done, {error, Error, Line}, Rest};
skip_cont(Rest, Line, {end_token, _T, Push}, Error) ->
NewRest = Push ++ Rest,
{done, {error, Error, Line}, NewRest};
skip_cont(Rest, Line, skip_token, Error) ->
skip_tokens(yystate(), Rest, Line, Rest, 0, Line, Error, reject, 0);
skip_cont(Rest, Line, {skip_token, Push}, Error) ->
NewRest = Push ++ Rest,
skip_tokens(yystate(), NewRest, Line, NewRest, 0, Line, Error, reject, 0);
skip_cont(Rest, Line, {error, _S}, Error) ->
skip_tokens(yystate(), Rest, Line, Rest, 0, Line, Error, reject, 0).
-compile({nowarn_unused_function, [yyrev/1, yyrev/2, yypre/2, yysuf/2]}).
yyrev(List) -> lists:reverse(List).
yyrev(List, Tail) -> lists:reverse(List, Tail).
yypre(List, N) -> lists:sublist(List, N).
yysuf(List, N) -> lists:nthtail(N, List).
%% adjust_line(TokenLength, AcceptLength, Chars, Line) -> NewLine
%% Make sure that newlines in Chars are not counted twice.
%% Line has been updated with respect to newlines in the prefix of
%% Chars consisting of (TokenLength - AcceptLength) characters.
-compile({nowarn_unused_function, adjust_line/4}).
adjust_line(N, N, _Cs, L) -> L;
adjust_line(T, A, [$\n | Cs], L) -> adjust_line(T - 1, A, Cs, L - 1);
adjust_line(T, A, [_ | Cs], L) -> adjust_line(T - 1, A, Cs, L).
%% yystate() -> InitialState.
%% yystate(State, InChars, Line, CurrTokLen, AcceptAction, AcceptLen) ->
%% {Action, AcceptLen, RestChars, Line} |
%% {Action, AcceptLen, RestChars, Line, State} |
%% {reject, AcceptLen, CurrTokLen, RestChars, Line, State} |
%% {Action, AcceptLen, CurrTokLen, RestChars, Line, State}.
%% Generated state transition functions. The non-accepting end state
%% return signal either an unrecognised character or end of current
%% input.
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.erl", 307).
yystate() -> 35.
yystate(38, [45 | Ics], Line, Tlen, Action, Alen) ->
yystate(30, Ics, Line, Tlen + 1, Action, Alen);
yystate(38, [43 | Ics], Line, Tlen, Action, Alen) ->
yystate(30, Ics, Line, Tlen + 1, Action, Alen);
yystate(38, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(34, Ics, Line, Tlen + 1, Action, Alen);
yystate(38, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 38};
yystate(37, Ics, Line, Tlen, _, _) ->
{12, Tlen, Ics, Line};
yystate(36, [32 | Ics], Line, Tlen, _, _) ->
yystate(36, Ics, Line, Tlen + 1, 10, Tlen);
yystate(36, [13 | Ics], Line, Tlen, _, _) ->
yystate(36, Ics, Line, Tlen + 1, 10, Tlen);
yystate(36, [11 | Ics], Line, Tlen, _, _) ->
yystate(36, Ics, Line, Tlen + 1, 10, Tlen);
yystate(36, [10 | Ics], Line, Tlen, _, _) ->
yystate(36, Ics, Line + 1, Tlen + 1, 10, Tlen);
yystate(36, [9 | Ics], Line, Tlen, _, _) ->
yystate(36, Ics, Line, Tlen + 1, 10, Tlen);
yystate(36, Ics, Line, Tlen, _, _) ->
{10, Tlen, Ics, Line, 36};
yystate(35, [65534 | Ics], Line, Tlen, Action, Alen) ->
yystate(37, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [65279 | Ics], Line, Tlen, Action, Alen) ->
yystate(37, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [125 | Ics], Line, Tlen, Action, Alen) ->
yystate(31, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [123 | Ics], Line, Tlen, Action, Alen) ->
yystate(27, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [116 | Ics], Line, Tlen, Action, Alen) ->
yystate(23, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [110 | Ics], Line, Tlen, Action, Alen) ->
yystate(7, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [102 | Ics], Line, Tlen, Action, Alen) ->
yystate(8, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [93 | Ics], Line, Tlen, Action, Alen) ->
yystate(28, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [91 | Ics], Line, Tlen, Action, Alen) ->
yystate(32, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [58 | Ics], Line, Tlen, Action, Alen) ->
yystate(36, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [48 | Ics], Line, Tlen, Action, Alen) ->
yystate(14, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [45 | Ics], Line, Tlen, Action, Alen) ->
yystate(10, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [44 | Ics], Line, Tlen, Action, Alen) ->
yystate(6, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [34 | Ics], Line, Tlen, Action, Alen) ->
yystate(29, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [32 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [13 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [11 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [10 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line + 1, Tlen + 1, Action, Alen);
yystate(35, [9 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [0 | Ics], Line, Tlen, Action, Alen) ->
yystate(37, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, [C | Ics], Line, Tlen, Action, Alen) when C >= 49, C =< 57 ->
yystate(26, Ics, Line, Tlen + 1, Action, Alen);
yystate(35, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 35};
yystate(34, [C | Ics], Line, Tlen, _, _) when C >= 48, C =< 57 ->
yystate(34, Ics, Line, Tlen + 1, 5, Tlen);
yystate(34, Ics, Line, Tlen, _, _) ->
{5, Tlen, Ics, Line, 34};
yystate(33, [125 | Ics], Line, Tlen, Action, Alen) ->
yystate(31, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [123 | Ics], Line, Tlen, Action, Alen) ->
yystate(27, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [93 | Ics], Line, Tlen, Action, Alen) ->
yystate(28, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [91 | Ics], Line, Tlen, Action, Alen) ->
yystate(32, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [58 | Ics], Line, Tlen, Action, Alen) ->
yystate(36, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [44 | Ics], Line, Tlen, Action, Alen) ->
yystate(6, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [32 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [13 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [11 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, [10 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line + 1, Tlen + 1, Action, Alen);
yystate(33, [9 | Ics], Line, Tlen, Action, Alen) ->
yystate(33, Ics, Line, Tlen + 1, Action, Alen);
yystate(33, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 33};
yystate(32, [32 | Ics], Line, Tlen, _, _) ->
yystate(32, Ics, Line, Tlen + 1, 6, Tlen);
yystate(32, [13 | Ics], Line, Tlen, _, _) ->
yystate(32, Ics, Line, Tlen + 1, 6, Tlen);
yystate(32, [11 | Ics], Line, Tlen, _, _) ->
yystate(32, Ics, Line, Tlen + 1, 6, Tlen);
yystate(32, [10 | Ics], Line, Tlen, _, _) ->
yystate(32, Ics, Line + 1, Tlen + 1, 6, Tlen);
yystate(32, [9 | Ics], Line, Tlen, _, _) ->
yystate(32, Ics, Line, Tlen + 1, 6, Tlen);
yystate(32, Ics, Line, Tlen, _, _) ->
{6, Tlen, Ics, Line, 32};
yystate(31, [32 | Ics], Line, Tlen, _, _) ->
yystate(31, Ics, Line, Tlen + 1, 9, Tlen);
yystate(31, [13 | Ics], Line, Tlen, _, _) ->
yystate(31, Ics, Line, Tlen + 1, 9, Tlen);
yystate(31, [11 | Ics], Line, Tlen, _, _) ->
yystate(31, Ics, Line, Tlen + 1, 9, Tlen);
yystate(31, [10 | Ics], Line, Tlen, _, _) ->
yystate(31, Ics, Line + 1, Tlen + 1, 9, Tlen);
yystate(31, [9 | Ics], Line, Tlen, _, _) ->
yystate(31, Ics, Line, Tlen + 1, 9, Tlen);
yystate(31, Ics, Line, Tlen, _, _) ->
{9, Tlen, Ics, Line, 31};
yystate(30, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(34, Ics, Line, Tlen + 1, Action, Alen);
yystate(30, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 30};
yystate(29, [92 | Ics], Line, Tlen, Action, Alen) ->
yystate(2, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, [34 | Ics], Line, Tlen, Action, Alen) ->
yystate(25, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, [32 | Ics], Line, Tlen, Action, Alen) ->
yystate(29, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, [33 | Ics], Line, Tlen, Action, Alen) ->
yystate(29, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, [C | Ics], Line, Tlen, Action, Alen) when C >= 35, C =< 91 ->
yystate(29, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, [C | Ics], Line, Tlen, Action, Alen) when C >= 93, C =< 1114111 ->
yystate(29, Ics, Line, Tlen + 1, Action, Alen);
yystate(29, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 29};
yystate(28, [32 | Ics], Line, Tlen, _, _) ->
yystate(28, Ics, Line, Tlen + 1, 7, Tlen);
yystate(28, [13 | Ics], Line, Tlen, _, _) ->
yystate(28, Ics, Line, Tlen + 1, 7, Tlen);
yystate(28, [11 | Ics], Line, Tlen, _, _) ->
yystate(28, Ics, Line, Tlen + 1, 7, Tlen);
yystate(28, [10 | Ics], Line, Tlen, _, _) ->
yystate(28, Ics, Line + 1, Tlen + 1, 7, Tlen);
yystate(28, [9 | Ics], Line, Tlen, _, _) ->
yystate(28, Ics, Line, Tlen + 1, 7, Tlen);
yystate(28, Ics, Line, Tlen, _, _) ->
{7, Tlen, Ics, Line, 28};
yystate(27, [32 | Ics], Line, Tlen, _, _) ->
yystate(27, Ics, Line, Tlen + 1, 8, Tlen);
yystate(27, [13 | Ics], Line, Tlen, _, _) ->
yystate(27, Ics, Line, Tlen + 1, 8, Tlen);
yystate(27, [11 | Ics], Line, Tlen, _, _) ->
yystate(27, Ics, Line, Tlen + 1, 8, Tlen);
yystate(27, [10 | Ics], Line, Tlen, _, _) ->
yystate(27, Ics, Line + 1, Tlen + 1, 8, Tlen);
yystate(27, [9 | Ics], Line, Tlen, _, _) ->
yystate(27, Ics, Line, Tlen + 1, 8, Tlen);
yystate(27, Ics, Line, Tlen, _, _) ->
{8, Tlen, Ics, Line, 27};
yystate(26, [101 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(26, [69 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(26, [46 | Ics], Line, Tlen, _, _) ->
yystate(22, Ics, Line, Tlen + 1, 5, Tlen);
yystate(26, [C | Ics], Line, Tlen, _, _) when C >= 48, C =< 57 ->
yystate(26, Ics, Line, Tlen + 1, 5, Tlen);
yystate(26, Ics, Line, Tlen, _, _) ->
{5, Tlen, Ics, Line, 26};
yystate(25, Ics, Line, Tlen, _, _) ->
{0, Tlen, Ics, Line};
yystate(24, Ics, Line, Tlen, _, _) ->
{2, Tlen, Ics, Line};
yystate(23, [114 | Ics], Line, Tlen, Action, Alen) ->
yystate(19, Ics, Line, Tlen + 1, Action, Alen);
yystate(23, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 23};
yystate(22, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(18, Ics, Line, Tlen + 1, Action, Alen);
yystate(22, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 22};
yystate(21, [92 | Ics], Line, Tlen, Action, Alen) ->
yystate(2, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, [34 | Ics], Line, Tlen, Action, Alen) ->
yystate(17, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, [32 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, [33 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, [C | Ics], Line, Tlen, Action, Alen) when C >= 35, C =< 91 ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, [C | Ics], Line, Tlen, Action, Alen) when C >= 93, C =< 1114111 ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(21, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 21};
yystate(20, [101 | Ics], Line, Tlen, Action, Alen) ->
yystate(24, Ics, Line, Tlen + 1, Action, Alen);
yystate(20, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 20};
yystate(19, [117 | Ics], Line, Tlen, Action, Alen) ->
yystate(15, Ics, Line, Tlen + 1, Action, Alen);
yystate(19, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 19};
yystate(18, [101 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(18, [69 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(18, [C | Ics], Line, Tlen, _, _) when C >= 48, C =< 57 ->
yystate(18, Ics, Line, Tlen + 1, 5, Tlen);
yystate(18, Ics, Line, Tlen, _, _) ->
{5, Tlen, Ics, Line, 18};
yystate(17, Ics, Line, Tlen, _, _) ->
{1, Tlen, Ics, Line};
yystate(16, [115 | Ics], Line, Tlen, Action, Alen) ->
yystate(20, Ics, Line, Tlen + 1, Action, Alen);
yystate(16, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 16};
yystate(15, [101 | Ics], Line, Tlen, Action, Alen) ->
yystate(11, Ics, Line, Tlen + 1, Action, Alen);
yystate(15, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 15};
yystate(14, [101 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(14, [69 | Ics], Line, Tlen, _, _) ->
yystate(38, Ics, Line, Tlen + 1, 5, Tlen);
yystate(14, [46 | Ics], Line, Tlen, _, _) ->
yystate(22, Ics, Line, Tlen + 1, 5, Tlen);
yystate(14, Ics, Line, Tlen, _, _) ->
{5, Tlen, Ics, Line, 14};
yystate(13, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(13, [C | Ics], Line, Tlen, Action, Alen) when C >= 65, C =< 70 ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(13, [C | Ics], Line, Tlen, Action, Alen) when C >= 97, C =< 102 ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(13, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 13};
yystate(12, [108 | Ics], Line, Tlen, Action, Alen) ->
yystate(16, Ics, Line, Tlen + 1, Action, Alen);
yystate(12, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 12};
yystate(11, Ics, Line, Tlen, _, _) ->
{3, Tlen, Ics, Line};
yystate(10, [48 | Ics], Line, Tlen, Action, Alen) ->
yystate(14, Ics, Line, Tlen + 1, Action, Alen);
yystate(10, [C | Ics], Line, Tlen, Action, Alen) when C >= 49, C =< 57 ->
yystate(26, Ics, Line, Tlen + 1, Action, Alen);
yystate(10, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 10};
yystate(9, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(13, Ics, Line, Tlen + 1, Action, Alen);
yystate(9, [C | Ics], Line, Tlen, Action, Alen) when C >= 65, C =< 70 ->
yystate(13, Ics, Line, Tlen + 1, Action, Alen);
yystate(9, [C | Ics], Line, Tlen, Action, Alen) when C >= 97, C =< 102 ->
yystate(13, Ics, Line, Tlen + 1, Action, Alen);
yystate(9, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 9};
yystate(8, [97 | Ics], Line, Tlen, Action, Alen) ->
yystate(12, Ics, Line, Tlen + 1, Action, Alen);
yystate(8, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 8};
yystate(7, [117 | Ics], Line, Tlen, Action, Alen) ->
yystate(3, Ics, Line, Tlen + 1, Action, Alen);
yystate(7, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 7};
yystate(6, [32 | Ics], Line, Tlen, _, _) ->
yystate(6, Ics, Line, Tlen + 1, 11, Tlen);
yystate(6, [13 | Ics], Line, Tlen, _, _) ->
yystate(6, Ics, Line, Tlen + 1, 11, Tlen);
yystate(6, [11 | Ics], Line, Tlen, _, _) ->
yystate(6, Ics, Line, Tlen + 1, 11, Tlen);
yystate(6, [10 | Ics], Line, Tlen, _, _) ->
yystate(6, Ics, Line + 1, Tlen + 1, 11, Tlen);
yystate(6, [9 | Ics], Line, Tlen, _, _) ->
yystate(6, Ics, Line, Tlen + 1, 11, Tlen);
yystate(6, Ics, Line, Tlen, _, _) ->
{11, Tlen, Ics, Line, 6};
yystate(5, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(9, Ics, Line, Tlen + 1, Action, Alen);
yystate(5, [C | Ics], Line, Tlen, Action, Alen) when C >= 65, C =< 70 ->
yystate(9, Ics, Line, Tlen + 1, Action, Alen);
yystate(5, [C | Ics], Line, Tlen, Action, Alen) when C >= 97, C =< 102 ->
yystate(9, Ics, Line, Tlen + 1, Action, Alen);
yystate(5, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 5};
yystate(4, Ics, Line, Tlen, _, _) ->
{4, Tlen, Ics, Line};
yystate(3, [108 | Ics], Line, Tlen, Action, Alen) ->
yystate(0, Ics, Line, Tlen + 1, Action, Alen);
yystate(3, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 3};
yystate(2, [117 | Ics], Line, Tlen, Action, Alen) ->
yystate(1, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [116 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [114 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [110 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [102 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [98 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [92 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [47 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, [34 | Ics], Line, Tlen, Action, Alen) ->
yystate(21, Ics, Line, Tlen + 1, Action, Alen);
yystate(2, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 2};
yystate(1, [C | Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 ->
yystate(5, Ics, Line, Tlen + 1, Action, Alen);
yystate(1, [C | Ics], Line, Tlen, Action, Alen) when C >= 65, C =< 70 ->
yystate(5, Ics, Line, Tlen + 1, Action, Alen);
yystate(1, [C | Ics], Line, Tlen, Action, Alen) when C >= 97, C =< 102 ->
yystate(5, Ics, Line, Tlen + 1, Action, Alen);
yystate(1, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 1};
yystate(0, [108 | Ics], Line, Tlen, Action, Alen) ->
yystate(4, Ics, Line, Tlen + 1, Action, Alen);
yystate(0, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, 0};
yystate(S, Ics, Line, Tlen, Action, Alen) ->
{Action, Alen, Tlen, Ics, Line, S}.
%% yyaction(Action, TokenLength, TokenChars, TokenLine) ->
%% {token,Token} | {end_token, Token} | skip_token | {error,String}.
%% Generated action function.
yyaction(0, TokenLen, YYtcs, TokenLine) ->
TokenChars = yypre(YYtcs, TokenLen),
yyaction_0(TokenChars, TokenLine);
yyaction(1, TokenLen, YYtcs, TokenLine) ->
TokenChars = yypre(YYtcs, TokenLen),
yyaction_1(TokenChars, TokenLine);
yyaction(2, _, _, TokenLine) ->
yyaction_2(TokenLine);
yyaction(3, _, _, TokenLine) ->
yyaction_3(TokenLine);
yyaction(4, _, _, TokenLine) ->
yyaction_4(TokenLine);
yyaction(5, TokenLen, YYtcs, TokenLine) ->
TokenChars = yypre(YYtcs, TokenLen),
yyaction_5(TokenChars, TokenLine);
yyaction(6, _, _, TokenLine) ->
yyaction_6(TokenLine);
yyaction(7, _, _, TokenLine) ->
yyaction_7(TokenLine);
yyaction(8, _, _, TokenLine) ->
yyaction_8(TokenLine);
yyaction(9, _, _, TokenLine) ->
yyaction_9(TokenLine);
yyaction(10, _, _, TokenLine) ->
yyaction_10(TokenLine);
yyaction(11, _, _, TokenLine) ->
yyaction_11(TokenLine);
yyaction(12, _, _, _) ->
yyaction_12();
yyaction(_, _, _, _) ->
error.
-compile({inline, yyaction_0/2}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 17).
yyaction_0(TokenChars, TokenLine) ->
{token, {string, TokenLine, TokenChars}}.
-compile({inline, yyaction_1/2}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 18).
yyaction_1(TokenChars, TokenLine) ->
{token, {esc_string, TokenLine, TokenChars}}.
-compile({inline, yyaction_2/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 21).
yyaction_2(TokenLine) ->
{token, {false, TokenLine, false}}.
-compile({inline, yyaction_3/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 22).
yyaction_3(TokenLine) ->
{token, {true, TokenLine, true}}.
-compile({inline, yyaction_4/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 23).
yyaction_4(TokenLine) ->
{token, {null, TokenLine, null}}.
-compile({inline, yyaction_5/2}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 25).
yyaction_5(TokenChars, TokenLine) ->
{token, {number, TokenLine, TokenChars}}.
-compile({inline, yyaction_6/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 27).
yyaction_6(TokenLine) ->
{token, {array_begin, TokenLine, array_begin}}.
-compile({inline, yyaction_7/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 28).
yyaction_7(TokenLine) ->
{token, {array_end, TokenLine, array_end}}.
-compile({inline, yyaction_8/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 29).
yyaction_8(TokenLine) ->
{token, {object_begin, TokenLine, object_begin}}.
-compile({inline, yyaction_9/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 30).
yyaction_9(TokenLine) ->
{token, {object_end, TokenLine, object_end}}.
-compile({inline, yyaction_10/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 31).
yyaction_10(TokenLine) ->
{token, {name_sep, TokenLine, name_sep}}.
-compile({inline, yyaction_11/1}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 32).
yyaction_11(TokenLine) ->
{token, {value_sep, TokenLine, value_sep}}.
-compile({inline, yyaction_12/0}).
-file("/Users/zdean/git/zadean/xqerl/src/xqldb_json_scanner.xrl", 33).
yyaction_12() ->
skip_token.
-file("/usr/local/Cellar/erlang/24.1.2/lib/erlang/lib/parsetools-2.3.1/include/leexinc.hrl", 313).