aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPatrik Nyblom <[email protected]>2012-04-19 16:51:24 +0200
committerPatrik Nyblom <[email protected]>2012-04-19 18:29:06 +0200
commit64028ec29c663d692539d34fb2b6a2f90ae080d4 (patch)
treeef73317b735d526b00cd92097864f125393964bb
parentcff02d4925bfd6ed88d9d7b897f4b4416e4643ce (diff)
downloadotp-64028ec29c663d692539d34fb2b6a2f90ae080d4.tar.gz
otp-64028ec29c663d692539d34fb2b6a2f90ae080d4.tar.bz2
otp-64028ec29c663d692539d34fb2b6a2f90ae080d4.zip
Correct dtrace for master branch
-rw-r--r--erts/emulator/beam/beam_emu.c6
-rw-r--r--erts/preloaded/ebin/erlang.beambin88612 -> 88856 bytes
-rw-r--r--erts/preloaded/src/erlang.erl4
3 files changed, 5 insertions, 5 deletions
diff --git a/erts/emulator/beam/beam_emu.c b/erts/emulator/beam/beam_emu.c
index 2042b2c12a..49c4ac1b00 100644
--- a/erts/emulator/beam/beam_emu.c
+++ b/erts/emulator/beam/beam_emu.c
@@ -1560,7 +1560,7 @@ void process_main(void)
*/
#ifdef USE_VM_CALL_PROBES
if (DTRACE_ENABLED(global_function_entry)) {
- BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->address);
+ BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->addressv[erts_active_code_ix()]);
DTRACE_GLOBAL_CALL(c_p, (Eterm)fp[-3], (Eterm)fp[-2], fp[-1]);
}
#endif
@@ -1575,7 +1575,7 @@ void process_main(void)
SET_CP(c_p, I+2);
#ifdef USE_VM_CALL_PROBES
if (DTRACE_ENABLED(global_function_entry)) {
- BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->address);
+ BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->addressv[erts_active_code_ix()]);
DTRACE_GLOBAL_CALL(c_p, (Eterm)fp[-3], (Eterm)fp[-2], fp[-1]);
}
#endif
@@ -1588,7 +1588,7 @@ void process_main(void)
OpCase(i_call_ext_only_e):
#ifdef USE_VM_CALL_PROBES
if (DTRACE_ENABLED(global_function_entry)) {
- BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->address);
+ BeamInstr* fp = (BeamInstr *) (((Export *) Arg(0))->addressv[erts_active_code_ix()]);
DTRACE_GLOBAL_CALL(c_p, (Eterm)fp[-3], (Eterm)fp[-2], fp[-1]);
}
#endif
diff --git a/erts/preloaded/ebin/erlang.beam b/erts/preloaded/ebin/erlang.beam
index f50b8e9d43..3450e6110e 100644
--- a/erts/preloaded/ebin/erlang.beam
+++ b/erts/preloaded/ebin/erlang.beam
Binary files differ
diff --git a/erts/preloaded/src/erlang.erl b/erts/preloaded/src/erlang.erl
index c55a90b3fb..614b6053fc 100644
--- a/erts/preloaded/src/erlang.erl
+++ b/erts/preloaded/src/erlang.erl
@@ -575,7 +575,7 @@ dist_exit(_P1, _P2, _P3) ->
erlang:nif_error(undefined).
%% dt_append_vm_tag_data/1
--spec dt_append_vm_tag_data(IoData) -> IoDataRet when
+-spec erlang:dt_append_vm_tag_data(IoData) -> IoDataRet when
IoData :: iodata(),
IoDataRet :: iodata().
dt_append_vm_tag_data(_IoData) ->
@@ -592,7 +592,7 @@ dt_get_tag_data() ->
erlang:nif_error(undefined).
%% dt_prepend_vm_tag_data/1
--spec dt_prepend_vm_tag_data(IoData) -> IoDataRet when
+-spec erlang:dt_prepend_vm_tag_data(IoData) -> IoDataRet when
IoData :: iodata(),
IoDataRet :: iodata().
dt_prepend_vm_tag_data(_IoData) ->