José Valim
404f77421a
This refactoring helps us clean up the interpolation code and guarantee it works as expected since it goes under the same tokenization rules. It also helps provide better sigil handling (going to be improved in upcoming commits).
85 lines
3.4 KiB
Erlang
85 lines
3.4 KiB
Erlang
-define(wrap_call(Line, Module, Function, Args),
|
|
{ call, Line,
|
|
{ remote, Line, { atom, Line, Module }, { atom, Line, Function } },
|
|
Args
|
|
}).
|
|
|
|
-define(atom_concat(Atoms), list_to_atom(lists:concat(Atoms))).
|
|
-define(elixir_macro(Macro), list_to_atom(lists:concat(['MACRO-',Macro]))).
|
|
-define(line(Opts), elixir_utils:get_line(Opts)).
|
|
|
|
-record(elixir_scope, {
|
|
context=nil, %% can be assign, guards or nil
|
|
extra=nil, %% extra information about the context, like fn_match for fns
|
|
noname=false, %% when true, don't add new names (used by try)
|
|
super=false, %% when true, it means super was invoked
|
|
caller=false, %% when true, it means caller was invoked
|
|
module=nil, %% the current module
|
|
function=nil, %% the current function
|
|
vars=[], %% a dict of defined variables and their alias
|
|
backup_vars=nil, %% a copy of vars to be used on ^var
|
|
temp_vars=nil, %% a set of all variables defined in a particular assign
|
|
clause_vars=nil, %% a dict of all variables defined in a particular clause
|
|
extra_guards=nil, %% extra guards from args expansion
|
|
counter=[], %% a counter for the variables defined
|
|
local=nil, %% the scope to evaluate local functions against
|
|
context_modules=[], %% modules defined in the current context
|
|
macro_aliases=[], %% keep aliases defined inside a macro
|
|
aliases, %% an orddict with aliases by new -> old names
|
|
file, %% the current scope filename
|
|
requires, %% a set with modules required
|
|
macro_macros=[], %% a list with macros imported from module inside a macro
|
|
macros, %% a list with macros imported from module
|
|
macro_functions=[], %% a list with functions imported from module inside a macro
|
|
functions %% a list with functions imported from module
|
|
}).
|
|
|
|
-record(elixir_quote, {
|
|
line=0,
|
|
context=nil,
|
|
vars_hygiene=true,
|
|
aliases_hygiene=true,
|
|
imports_hygiene=true,
|
|
unquote=true,
|
|
unquoted=false,
|
|
escape=false
|
|
}).
|
|
|
|
-record(elixir_tokenizer, {
|
|
file,
|
|
terminators=[],
|
|
check_terminators=true,
|
|
existing_atoms_only=false
|
|
}).
|
|
|
|
%% Introspection
|
|
-define(defs(Kind), Kind == def; Kind == defp; Kind == defmacro; Kind == defmacrop).
|
|
|
|
%% Used in tokenization and interpolation
|
|
|
|
%% Numbers
|
|
-define(is_hex(S), ?is_digit(S) orelse (S >= $A andalso S =< $F) orelse (S >= $a andalso S =< $f)).
|
|
-define(is_bin(S), S >= $0 andalso S =< $1).
|
|
-define(is_octal(S), S >= $0 andalso S =< $7).
|
|
-define(is_leading_octal(S), S >= $0 andalso S =< $3).
|
|
|
|
%% Digits and letters
|
|
-define(is_digit(S), S >= $0 andalso S =< $9).
|
|
-define(is_upcase(S), S >= $A andalso S =< $Z).
|
|
-define(is_downcase(S), S >= $a andalso S =< $z).
|
|
|
|
%% Atoms
|
|
-define(is_atom_start(S), ?is_quote(S) orelse ?is_upcase(S) orelse ?is_downcase(S) orelse (S == $_)).
|
|
-define(is_atom(S), ?is_identifier(S) orelse (S == $@)).
|
|
|
|
-define(is_identifier(S), ?is_digit(S) orelse ?is_upcase(S) orelse ?is_downcase(S) orelse (S == $_)).
|
|
-define(is_terminator(S), (S == $?) orelse (S == $!) orelse (S == $:)).
|
|
|
|
%% Quotes
|
|
-define(is_quote(S), S == $" orelse S == $').
|
|
|
|
%% Spaces
|
|
-define(is_horizontal_space(S), (S == $\s) orelse (S == $\t)).
|
|
-define(is_vertical_space(S), (S == $\r) orelse (S == $\n)).
|
|
-define(is_space(S), ?is_horizontal_space(S) orelse ?is_vertical_space(S)).
|