Varibles rename
This commit is contained in:
parent
b23d40e1e6
commit
342126b60e
@ -1289,10 +1289,10 @@ check_constants(Env = #env{ what = What }, Consts) ->
|
|||||||
HasValidId = fun({letval, _, {id, _, _}, _}) -> true;
|
HasValidId = fun({letval, _, {id, _, _}, _}) -> true;
|
||||||
(_) -> false
|
(_) -> false
|
||||||
end,
|
end,
|
||||||
{ValidConsts, InvalidConsts} = lists:partition(HasValidId, Consts),
|
{Valid, Invalid} = lists:partition(HasValidId, Consts),
|
||||||
[ type_error({invalid_const_id, aeso_syntax:get_ann(Pat)}) || {letval, _, Pat, _} <- InvalidConsts ],
|
[ type_error({invalid_const_id, aeso_syntax:get_ann(Pat)}) || {letval, _, Pat, _} <- Invalid ],
|
||||||
[ type_error({illegal_const_in_interface, Ann}) || {letval, Ann, _, _} <- ValidConsts, What == contract_interface ],
|
[ type_error({illegal_const_in_interface, Ann}) || {letval, Ann, _, _} <- Valid, What == contract_interface ],
|
||||||
ConstMap = maps:from_list([ {name(Id), Const} || Const = {letval, _, Id, _} <- ValidConsts ]),
|
ConstMap = maps:from_list([ {name(Id), Const} || Const = {letval, _, Id, _} <- Valid ]),
|
||||||
DepGraph = maps:map(fun(_, Const) -> aeso_syntax_utils:used_ids(Const) end, ConstMap),
|
DepGraph = maps:map(fun(_, Const) -> aeso_syntax_utils:used_ids(Const) end, ConstMap),
|
||||||
SCCs = aeso_utils:scc(DepGraph),
|
SCCs = aeso_utils:scc(DepGraph),
|
||||||
bind_consts(Env, ConstMap, SCCs, []).
|
bind_consts(Env, ConstMap, SCCs, []).
|
||||||
|
Loading…
x
Reference in New Issue
Block a user