diff --git a/src/compile/utKvsToBeam.erl b/src/compile/utKvsToBeam.erl index 6f84724..13c6882 100644 --- a/src/compile/utKvsToBeam.erl +++ b/src/compile/utKvsToBeam.erl @@ -13,7 +13,7 @@ load(Module, KVs) -> Forms = forms(Module, KVs), {ok, Module, Bin} = compile:forms(Forms), code:soft_purge(Module), - {module, Module} = code:load_binary(Module, atom_to_list(Module), Bin), + {module, Module} = code:load_binary(Module, [], Bin), ok. forms(Module, KVs) -> diff --git a/src/compile/utStrToBeam.erl b/src/compile/utStrToBeam.erl index eb61539..3c229ce 100644 --- a/src/compile/utStrToBeam.erl +++ b/src/compile/utStrToBeam.erl @@ -8,4 +8,4 @@ load(Module, Export, Str) -> {ok, Forms} = erl_parse:parse_form(Tokens), NewForms = [{attribute, 1, module, Module}, {attribute, 2, export, Export}, Forms], {ok, _, Binary} = compile:forms(NewForms), - code:load_binary(Module, "", Binary). + code:load_binary(Module, [], Binary).