Debug print AACI instead

This commit is contained in:
Jarvis Carroll 2025-08-22 14:21:25 +10:00
parent 2ecde986bf
commit 2952822a8f

View File

@ -838,10 +838,7 @@ open_hash3(State, Address, Source) ->
Options = sophia_options(), Options = sophia_options(),
case so_compiler:from_string(Source, Options) of case so_compiler:from_string(Source, Options) of
{ok, Build = #{aci := ACI}} -> {ok, Build = #{aci := ACI}} ->
% AACI = hz:prepare_aaci(ACI), {aaci, _Name, FunDefs, _TypeDefs} = hz:prepare_aaci(ACI),
{Defs = #{functions := Funs}, ConIfaces} = find_main(ACI),
Callable = maps:remove("init", Funs),
FunDefs = {maps:put(functions, Callable, Defs), ConIfaces},
ok = tell(info, "Compilation Succeeded!~n~tp~n~n~tp", [Build, FunDefs]), ok = tell(info, "Compilation Succeeded!~n~tp~n~n~tp", [Build, FunDefs]),
add_code_page(State, {hash, Address}, Source); add_code_page(State, {hash, Address}, Source);
Other -> Other ->