aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLukas Larsson <[email protected]>2019-03-22 13:32:16 +0100
committerLukas Larsson <[email protected]>2019-03-25 16:34:11 +0100
commitea8cff230088d442539976c75b85368d38429b06 (patch)
treeafa6f03d33ce6220d43a454e69fcf63fe192cfad
parent9426d0cbb790b50ad5afcf348bb24e73e6b7b2da (diff)
downloadotp-ea8cff230088d442539976c75b85368d38429b06.tar.gz
otp-ea8cff230088d442539976c75b85368d38429b06.tar.bz2
otp-ea8cff230088d442539976c75b85368d38429b06.zip
etp: Don't crash etp-stack* when c_p->i is null
-rw-r--r--erts/etc/unix/etp-commands.in6
1 files changed, 4 insertions, 2 deletions
diff --git a/erts/etc/unix/etp-commands.in b/erts/etc/unix/etp-commands.in
index e8dc59156f..dc28107ef5 100644
--- a/erts/etc/unix/etp-commands.in
+++ b/erts/etc/unix/etp-commands.in
@@ -1453,8 +1453,10 @@ define etp-stack-preamble
set $etp_stack_p = ($arg0)->stop
set $etp_stack_end = ($arg0)->hend
printf "%% Stacktrace (%u)\n", $etp_stack_end-$etp_stack_p
- etp-1 ((Eterm)($arg0)->i) 0
- printf " (I)\n"
+ if ($arg0)->i != 0
+ etp-1 ((Eterm)($arg0)->i) 0
+ printf " (I)\n"
+ end
if ($arg0)->cp != 0
etp-1 ((Eterm)($arg0)->cp) 0
printf " (cp)\n"