diff options
| author | Björn Gustavsson <[email protected]> | 2016-05-30 12:26:28 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2016-05-30 12:26:28 +0200 |
| commit | c4ac159d055e36c0c7096f5038cc51c291b72771 (patch) | |
| tree | 54be49e65d3e18bd50dcbd4e6166d6aae8c9556c /lib/compiler/src/beam_disasm.erl | |
| parent | 49ed8a5a1cddc806dd520aaa79e1a089194566c1 (diff) | |
| parent | d6d52477cdd6efefd3d3d93f4433b2b1f4e52ce7 (diff) | |
| download | otp-c4ac159d055e36c0c7096f5038cc51c291b72771.tar.gz otp-c4ac159d055e36c0c7096f5038cc51c291b72771.tar.bz2 otp-c4ac159d055e36c0c7096f5038cc51c291b72771.zip | |
Merge branch 'kostis/beam_disasm-entry-type/PR-1072'
* kostis/beam_disasm-entry-type/PR-1072:
Declare the type of function entry points
Export label() type
Diffstat (limited to 'lib/compiler/src/beam_disasm.erl')
| -rw-r--r-- | lib/compiler/src/beam_disasm.erl | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lib/compiler/src/beam_disasm.erl b/lib/compiler/src/beam_disasm.erl index 5badcce696..c699672db1 100644 --- a/lib/compiler/src/beam_disasm.erl +++ b/lib/compiler/src/beam_disasm.erl @@ -314,10 +314,7 @@ get_funs({LsR0,[{func_info,[{atom,M}=AtomM,{atom,F}=AtomF,ArityArg]}|Code0]}) when is_atom(M), is_atom(F) -> Arity = resolve_arg_unsigned(ArityArg), {LsR,Code,RestCode} = get_fun(Code0, []), - Entry = case Code of - [{label,[{u,E}]}|_] -> E; - _ -> undefined - end, + [{label,[{u,Entry}]}|_] = Code, [#function{name=F, arity=Arity, entry=Entry, |