diff options
author | Lukas Larsson <[email protected]> | 2019-03-22 13:32:16 +0100 |
---|---|---|
committer | Lukas Larsson <[email protected]> | 2019-03-25 16:34:11 +0100 |
commit | ea8cff230088d442539976c75b85368d38429b06 (patch) | |
tree | afa6f03d33ce6220d43a454e69fcf63fe192cfad | |
parent | 9426d0cbb790b50ad5afcf348bb24e73e6b7b2da (diff) | |
download | otp-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.in | 6 |
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" |