Don't destroy and recreate type errors table when not needed
This commit is contained in:
parent
8a9c2a61b2
commit
94c2f998ae
@ -863,11 +863,9 @@ infer1(Env0, [{Contract, Ann, ConName, Impls, Code} | Rest], Acc, Options)
|
|||||||
_ -> ok
|
_ -> ok
|
||||||
end
|
end
|
||||||
end, Impls),
|
end, Impls),
|
||||||
destroy_and_report_type_errors(Env),
|
|
||||||
create_type_errors(),
|
|
||||||
case What of
|
case What of
|
||||||
contract ->
|
contract ->
|
||||||
ImplementedInterfaces = [proplists:get_value(Name, AllInterfaces) || Name <- ImplsNames],
|
ImplementedInterfaces = [I || I <- [proplists:get_value(Name, AllInterfaces) || Name <- ImplsNames], I /= undefined],
|
||||||
check_implemented_interfaces(ImplementedInterfaces, ConName, [ Fun || Fun = {letfun, _, _, _, _, _} <- Code1 ], [], AllInterfaces);
|
check_implemented_interfaces(ImplementedInterfaces, ConName, [ Fun || Fun = {letfun, _, _, _, _, _} <- Code1 ], [], AllInterfaces);
|
||||||
contract_interface ->
|
contract_interface ->
|
||||||
ok
|
ok
|
||||||
|
Loading…
x
Reference in New Issue
Block a user