QPQ-AG/sophia
10
0
Fork 0
Code Issues 41 Pull Requests 5 Actions Packages Projects Releases 16 Wiki Activity

Return mapping from variables to registers in fate compilation #902

Merged
ghallak merged 13 commits from ghallak/vars-registers-map into master 2022-10-25 15:42:03 +09:00
Conversation 8 Commits 13 Files Changed 6 +6 -1
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files
Showing only changes of commit cb588dc04b - Show all commits

7
src/aeso_fcode_to_fate.erl
View File

@ -138,7 +138,12 @@ get_variables_registers() ->
add_variables_register(Env = #env{saved_fresh_names = SavedFreshNames}, Name, Register) -> add_variables_register(Env = #env{saved_fresh_names = SavedFreshNames}, Name, Register) ->
Olds = get_variables_registers(), Olds = get_variables_registers(),
RealName = maps:get(Name, SavedFreshNames, Name), RealName = maps:get(Name, SavedFreshNames, Name),
FunName = binary_to_list(make_function_name(Env#env.current_function)), FunName =
case Env#env.current_function of
event -> "Chain.event";
{entrypoint, BinName} -> binary_to_list(BinName);
{local_fun, QualName} -> lists:last(QualName)
end,
New = {Env#env.contract, FunName, RealName}, New = {Env#env.contract, FunName, RealName},
put(variables_registers, Olds#{New => Register}). put(variables_registers, Olds#{New => Register}).