aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/src/beam_disasm.erl
diff options
context:
space:
mode:
authorHaitao Li <lihaitao@gmail.com>2011-07-22 17:14:30 +0800
committerBjörn Gustavsson <bjorn@erlang.org>2011-09-21 12:19:48 +0200
commit347dfb022195994a368ff12f8d009b7263044f50 (patch)
tree5e7212c88241cdd35b125a3239abab69f505440e /lib/compiler/src/beam_disasm.erl
parenta3d8134ffcb4ec7be60bdc896fb9be0928c2b1ff (diff)
downloadotp-347dfb022195994a368ff12f8d009b7263044f50.tar.gz
otp-347dfb022195994a368ff12f8d009b7263044f50.tar.bz2
otp-347dfb022195994a368ff12f8d009b7263044f50.zip
beam_disasm: Handle stripped BEAM files
beam_disasm:file/1 would crash if asked to disassemble a stripped BEAM file without an "Attr" chunk.
Diffstat (limited to 'lib/compiler/src/beam_disasm.erl')
-rw-r--r--lib/compiler/src/beam_disasm.erl2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/compiler/src/beam_disasm.erl b/lib/compiler/src/beam_disasm.erl
index 017ca129b0..bb62bb04b3 100644
--- a/lib/compiler/src/beam_disasm.erl
+++ b/lib/compiler/src/beam_disasm.erl
@@ -204,7 +204,7 @@ process_chunks(F) ->
optional_chunk(F, ChunkTag) ->
case beam_lib:chunks(F, [ChunkTag]) of
{ok,{_Module,[{ChunkTag,Chunk}]}} -> Chunk;
- {error,beam_lib,{missing_chunk,_,ChunkTag}} -> none
+ {error,beam_lib,{missing_chunk,_,_}} -> none
end.
%%-----------------------------------------------------------------------