Update src/aeso_vm_decode.erl
Co-Authored-By: Hans Svensson <hanssv@gmail.com>
This commit is contained in:
parent
389e931674
commit
c745827c53
@ -104,7 +104,7 @@ from_fate({variant_t, Cons}, {variant, Ar, Tag, Args})
|
||||
Arity = lists:nth(Tag + 1, Ar),
|
||||
case tuple_to_list(Args) of
|
||||
ArgList when length(ArgList) == Arity ->
|
||||
from_fate(ConType, tuple_to_list(Args));
|
||||
from_fate(ConType, ArgList);
|
||||
_ -> throw(cannot_translate_to_sophia)
|
||||
end;
|
||||
from_fate({constr_t, _, Con, Types}, Args)
|
||||
|
Loading…
x
Reference in New Issue
Block a user