-file("/usr/local/Cellar/erlang/20.0/lib/erlang/lib/parsetools-2.1.5/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(decimal_formats_lexer). -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("src/decimal_formats_lexer.xrl", 32). currency_symbol(Len) -> list_to_atom("currency_" ++ integer_to_list(Len)). -file("/usr/local/Cellar/erlang/20.0/lib/erlang/lib/parsetools-2.1.5/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. string([], L, [], Ts) -> % No partial tokens! {ok,yyrev(Ts),L}; string(Ics0, L0, Tcs, Ts) -> case yystate(yystate(), Ics0, L0, 0, reject, 0) of {A,Alen,Ics1,L1} -> % Accepting end state string_cont(Ics1, L1, yyaction(A, Alen, Tcs, L0), Ts); {A,Alen,Ics1,L1,_S1} -> % Accepting transistion state string_cont(Ics1, L1, yyaction(A, Alen, Tcs, L0), Ts); {reject,_Alen,Tlen,_Ics1,L1,_S1} -> % After a non-accepting state {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. {A1,Alen1,[],L1,S1} -> % Need more chars to check {more,{token,S1,L1,Tcs,Alen1,Tline,A1,Alen1}}; {A1,Alen1,Ics1,L1,_S1} -> % Take what we got token_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline)); %% After a non-accepting state, maybe reach accept state later. {A1,Alen1,Tlen1,[],L1,S1} -> % Need more chars to check {more,{token,S1,L1,Tcs,Tlen1,Tline,A1,Alen1}}; {reject,_Alen1,Tlen1,eof,L1,_S1} -> % No token match %% 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}; {reject,_Alen1,Tlen1,Ics1,L1,_S1} -> % No token match Error = {Tline,?MODULE,{illegal,yypre(Tcs, Tlen1+1)}}, {done,{error,Error,L1},Ics1}; {A1,Alen1,Tlen1,_Ics1,L1,_S1} -> % Use last accept match 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. {A1,Alen1,[],L1,S1} -> % Need more chars to check {more,{tokens,S1,L1,Tcs,Alen1,Tline,Ts,A1,Alen1}}; {A1,Alen1,Ics1,L1,_S1} -> % Take what we got tokens_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Ts); %% After a non-accepting state, maybe reach accept state later. {A1,Alen1,Tlen1,[],L1,S1} -> % Need more chars to check {more,{tokens,S1,L1,Tcs,Tlen1,Tline,Ts,A1,Alen1}}; {reject,_Alen1,Tlen1,eof,L1,_S1} -> % No token match %% 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 {A1,Alen1,Ics1,L1} -> % Accepting end state skip_cont(Ics1, L1, yyaction(A1, Alen1, Tcs, Tline), Error); {A1,Alen1,[],L1,S1} -> % After an accepting state {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); {A1,Alen1,Tlen1,[],L1,S1} -> % After a non-accepting state {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). 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. 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("src/decimal_formats_lexer.erl", 306). yystate() -> 21. yystate(24, [101|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [69|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [46|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [44|Ics], Line, Tlen, _, _) -> yystate(24, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [35|Ics], Line, Tlen, _, _) -> yystate(18, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(18, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 68 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 70, C =< 100 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 102, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(24, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,24}; yystate(23, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [46|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [44|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 10, Tlen); yystate(23, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(23, Ics, Line, Tlen, _, _) -> {10,Tlen,Ics,Line,23}; yystate(22, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [46|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [44|Ics], Line, Tlen, _, _) -> yystate(24, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [35|Ics], Line, Tlen, _, _) -> yystate(18, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(18, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(22, Ics, Line, Tlen, _, _) -> {10,Tlen,Ics,Line,22}; yystate(21, [8240|Ics], Line, Tlen, _, _) -> yystate(17, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [164|Ics], Line, Tlen, _, _) -> yystate(13, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [101|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [69|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [64|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [59|Ics], Line, Tlen, _, _) -> yystate(2, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [46|Ics], Line, Tlen, _, _) -> yystate(22, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [45|Ics], Line, Tlen, _, _) -> yystate(20, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [44|Ics], Line, Tlen, _, _) -> yystate(16, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [43|Ics], Line, Tlen, _, _) -> yystate(12, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [42|Ics], Line, Tlen, _, _) -> yystate(8, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [39|Ics], Line, Tlen, _, _) -> yystate(0, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [37|Ics], Line, Tlen, _, _) -> yystate(15, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [35|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(6, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 68 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 70, C =< 100 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 102, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 165, C =< 8239 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, [C|Ics], Line, Tlen, _, _) when C >= 8241 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(21, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,21}; yystate(20, Ics, Line, Tlen, _, _) -> {4,Tlen,Ics,Line}; yystate(19, [101|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [69|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [64|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [46|Ics], Line, Tlen, _, _) -> yystate(14, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [44|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [35|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(19, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(6, Ics, Line, Tlen+1, 0, Tlen); yystate(19, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,19}; yystate(18, [101|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(18, [69|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(18, [44|Ics], Line, Tlen, _, _) -> yystate(18, Ics, Line, Tlen+1, 0, Tlen); yystate(18, [35|Ics], Line, Tlen, _, _) -> yystate(18, Ics, Line, Tlen+1, 0, Tlen); yystate(18, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(18, Ics, Line, Tlen+1, 0, Tlen); yystate(18, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,18}; yystate(17, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [46|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [44|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 2, Tlen); yystate(17, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 2, Tlen); yystate(17, Ics, Line, Tlen, _, _) -> {2,Tlen,Ics,Line,17}; yystate(16, [101|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [69|Ics], Line, Tlen, _, _) -> yystate(9, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [64|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [46|Ics], Line, Tlen, _, _) -> yystate(22, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [44|Ics], Line, Tlen, _, _) -> yystate(16, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [35|Ics], Line, Tlen, _, _) -> yystate(19, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(6, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 68 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 70, C =< 100 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 102, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 0, Tlen); yystate(16, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,16}; yystate(15, Ics, Line, Tlen, _, _) -> {1,Tlen,Ics,Line}; yystate(14, [44|Ics], Line, Tlen, Action, Alen) -> yystate(18, Ics, Line, Tlen+1, Action, Alen); yystate(14, [35|Ics], Line, Tlen, Action, Alen) -> yystate(18, Ics, Line, Tlen+1, Action, Alen); yystate(14, [C|Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 -> yystate(18, Ics, Line, Tlen+1, Action, Alen); yystate(14, Ics, Line, Tlen, Action, Alen) -> {Action,Alen,Tlen,Ics,Line,14}; yystate(13, [164|Ics], Line, Tlen, _, _) -> yystate(13, Ics, Line, Tlen+1, 6, Tlen); yystate(13, Ics, Line, Tlen, _, _) -> {6,Tlen,Ics,Line,13}; yystate(12, Ics, Line, Tlen, _, _) -> {3,Tlen,Ics,Line}; yystate(11, [39|Ics], Line, Tlen, Action, Alen) -> yystate(7, Ics, Line, Tlen+1, Action, Alen); yystate(11, Ics, Line, Tlen, Action, Alen) -> {Action,Alen,Tlen,Ics,Line,11}; yystate(10, [43|Ics], Line, Tlen, Action, Alen) -> yystate(1, Ics, Line, Tlen+1, Action, Alen); yystate(10, [C|Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 -> yystate(5, Ics, Line, Tlen+1, Action, Alen); yystate(10, Ics, Line, Tlen, Action, Alen) -> {Action,Alen,Tlen,Ics,Line,10}; yystate(9, [58|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [46|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [47|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [44|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [43|Ics], Line, Tlen, _, _) -> yystate(1, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [40|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [41|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [38|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [36|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [10|Ics], Line, Tlen, _, _) -> yystate(23, Ics, Line+1, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 0, C =< 9 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 11, C =< 34 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(5, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 60, C =< 63 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 65, C =< 163 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, [C|Ics], Line, Tlen, _, _) when C >= 165 -> yystate(23, Ics, Line, Tlen+1, 10, Tlen); yystate(9, Ics, Line, Tlen, _, _) -> {10,Tlen,Ics,Line,9}; yystate(8, [C|Ics], Line, Tlen, Action, Alen) when C >= 0, C =< 9 -> yystate(4, Ics, Line, Tlen+1, Action, Alen); yystate(8, [C|Ics], Line, Tlen, Action, Alen) when C >= 11 -> yystate(4, Ics, Line, Tlen+1, Action, Alen); yystate(8, Ics, Line, Tlen, Action, Alen) -> {Action,Alen,Tlen,Ics,Line,8}; yystate(7, Ics, Line, Tlen, _, _) -> {8,Tlen,Ics,Line}; yystate(6, [101|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(6, [69|Ics], Line, Tlen, _, _) -> yystate(10, Ics, Line, Tlen+1, 0, Tlen); yystate(6, [46|Ics], Line, Tlen, _, _) -> yystate(14, Ics, Line, Tlen+1, 0, Tlen); yystate(6, [44|Ics], Line, Tlen, _, _) -> yystate(6, Ics, Line, Tlen+1, 0, Tlen); yystate(6, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(6, Ics, Line, Tlen+1, 0, Tlen); yystate(6, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,6}; yystate(5, [C|Ics], Line, Tlen, _, _) when C >= 48, C =< 57 -> yystate(5, Ics, Line, Tlen+1, 0, Tlen); yystate(5, Ics, Line, Tlen, _, _) -> {0,Tlen,Ics,Line,5}; yystate(4, Ics, Line, Tlen, _, _) -> {7,Tlen,Ics,Line}; yystate(3, [39|Ics], Line, Tlen, _, _) -> yystate(7, Ics, Line, Tlen+1, 9, Tlen); yystate(3, Ics, Line, Tlen, _, _) -> {9,Tlen,Ics,Line,3}; yystate(2, Ics, Line, Tlen, _, _) -> {5,Tlen,Ics,Line}; yystate(1, [C|Ics], Line, Tlen, Action, Alen) when C >= 48, C =< 57 -> yystate(5, Ics, Line, Tlen+1, Action, Alen); yystate(1, Ics, Line, Tlen, Action, Alen) -> {Action,Alen,Tlen,Ics,Line,1}; yystate(0, [39|Ics], Line, Tlen, Action, Alen) -> yystate(3, Ics, Line, Tlen+1, Action, Alen); yystate(0, [C|Ics], Line, Tlen, Action, Alen) when C >= 0, C =< 9 -> yystate(11, Ics, Line, Tlen+1, Action, Alen); yystate(0, [C|Ics], Line, Tlen, Action, Alen) when C >= 11, C =< 38 -> yystate(11, Ics, Line, Tlen+1, Action, Alen); yystate(0, [C|Ics], Line, Tlen, Action, Alen) when C >= 40 -> yystate(11, 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, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_2(TokenChars, TokenLine); yyaction(3, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_3(TokenChars, TokenLine); yyaction(4, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_4(TokenChars, TokenLine); yyaction(5, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_5(TokenChars, TokenLine); yyaction(6, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_6(TokenChars, TokenLine); yyaction(7, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_7(TokenChars, TokenLine); yyaction(8, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_8(TokenChars, TokenLine); yyaction(9, _, _, TokenLine) -> yyaction_9(TokenLine); yyaction(10, TokenLen, YYtcs, TokenLine) -> TokenChars = yypre(YYtcs, TokenLen), yyaction_10(TokenChars, TokenLine); yyaction(_, _, _, _) -> error. -compile({inline,yyaction_0/2}). -file("src/decimal_formats_lexer.xrl", 18). yyaction_0(TokenChars, TokenLine) -> { token, { format, TokenLine, TokenChars } } . -compile({inline,yyaction_1/2}). -file("src/decimal_formats_lexer.xrl", 19). yyaction_1(TokenChars, TokenLine) -> { token, { percent, TokenLine, TokenChars } } . -compile({inline,yyaction_2/2}). -file("src/decimal_formats_lexer.xrl", 20). yyaction_2(TokenChars, TokenLine) -> { token, { permille, TokenLine, TokenChars } } . -compile({inline,yyaction_3/2}). -file("src/decimal_formats_lexer.xrl", 21). yyaction_3(TokenChars, TokenLine) -> { token, { plus, TokenLine, TokenChars } } . -compile({inline,yyaction_4/2}). -file("src/decimal_formats_lexer.xrl", 22). yyaction_4(TokenChars, TokenLine) -> { token, { minus, TokenLine, TokenChars } } . -compile({inline,yyaction_5/2}). -file("src/decimal_formats_lexer.xrl", 23). yyaction_5(TokenChars, TokenLine) -> { token, { semicolon, TokenLine, TokenChars } } . -compile({inline,yyaction_6/2}). -file("src/decimal_formats_lexer.xrl", 24). yyaction_6(TokenChars, TokenLine) -> { token, { currency_symbol (length (TokenChars)), TokenLine, length (TokenChars) } } . -compile({inline,yyaction_7/2}). -file("src/decimal_formats_lexer.xrl", 25). yyaction_7(TokenChars, TokenLine) -> { token, { pad, TokenLine, [lists : nth (2, TokenChars) ] } } . -compile({inline,yyaction_8/2}). -file("src/decimal_formats_lexer.xrl", 26). yyaction_8(TokenChars, TokenLine) -> { token, { quoted_char, TokenLine, [lists : nth (2, TokenChars) ] } } . -compile({inline,yyaction_9/1}). -file("src/decimal_formats_lexer.xrl", 27). yyaction_9(TokenLine) -> { token, { quote, TokenLine, ["'" ] } } . -compile({inline,yyaction_10/2}). -file("src/decimal_formats_lexer.xrl", 28). yyaction_10(TokenChars, TokenLine) -> { token, { literal, TokenLine, TokenChars } } . -file("/usr/local/Cellar/erlang/20.0/lib/erlang/lib/parsetools-2.1.5/include/leexinc.hrl", 309).