diff options
author | Sverker Eriksson <[email protected]> | 2014-05-28 15:19:34 +0200 |
---|---|---|
committer | Sverker Eriksson <[email protected]> | 2014-05-28 15:19:34 +0200 |
commit | afb2293740a6c55d41561cc657d13694ca557021 (patch) | |
tree | 08388896ddf535101da2c4810e754b764a92eed9 | |
parent | 235d02334181df0bed92b8c6af07d092627691fe (diff) | |
parent | 918d786cc3a6381a623bc1d2c09249a170110835 (diff) | |
download | otp-afb2293740a6c55d41561cc657d13694ca557021.tar.gz otp-afb2293740a6c55d41561cc657d13694ca557021.tar.bz2 otp-afb2293740a6c55d41561cc657d13694ca557021.zip |
Merge branch 'sverk/etp-cp-fix' into maint
* sverk/etp-cp-fix:
erts: Fix bug in gdb function etp-cp-1
-rw-r--r-- | erts/etc/unix/etp-commands.in | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/erts/etc/unix/etp-commands.in b/erts/etc/unix/etp-commands.in index ae1b1734af..19c92681d0 100644 --- a/erts/etc/unix/etp-commands.in +++ b/erts/etc/unix/etp-commands.in @@ -1065,7 +1065,9 @@ define etp-cp-1 set $etp_cp_mid = $etp_cp_low + ($etp_cp_high-$etp_cp_low)/2 end if $etp_cp_p - set $etp_cp_low = (Eterm**)($etp_cp_p->start + 8) + # 12 = MI_FUNCTIONS + set $etp_cp_low = (Eterm**)($etp_cp_p->start + 12) + # 0 = MI_NUM_FUNCTIONS set $etp_cp_high = $etp_cp_low +$etp_cp_p->start[0] set $etp_cp_p = 0 while $etp_cp_low < $etp_cp_high |