aboutsummaryrefslogtreecommitdiffstats
path: root/lib/observer/src/observer_traceoptions_wx.erl
diff options
context:
space:
mode:
authorDan Gudmundsson <[email protected]>2012-04-20 16:01:54 +0200
committerDan Gudmundsson <[email protected]>2012-04-27 12:47:48 +0200
commit9ac8b28e0ce7708acc4227eab9a5b869bbb90d4f (patch)
tree07ffe3601b4e27d11a6c407b7e913cc26bb2e114 /lib/observer/src/observer_traceoptions_wx.erl
parentb27c73232804f28b169e67ffa5793a76a7918279 (diff)
downloadotp-9ac8b28e0ce7708acc4227eab9a5b869bbb90d4f.tar.gz
otp-9ac8b28e0ce7708acc4227eab9a5b869bbb90d4f.tar.bz2
otp-9ac8b28e0ce7708acc4227eab9a5b869bbb90d4f.zip
[observer] Allow bifs when selecting functions for trace
Sigh (currently) bifs are not included in: Mod:module_info(functions) only in Mod:module_info(exports). Erlang compiler bug?
Diffstat (limited to 'lib/observer/src/observer_traceoptions_wx.erl')
-rw-r--r--lib/observer/src/observer_traceoptions_wx.erl8
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/observer/src/observer_traceoptions_wx.erl b/lib/observer/src/observer_traceoptions_wx.erl
index 6a634e06f0..e27f565abc 100644
--- a/lib/observer/src/observer_traceoptions_wx.erl
+++ b/lib/observer/src/observer_traceoptions_wx.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2011. All Rights Reserved.
+%% Copyright Ericsson AB 2011-2012. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -167,8 +167,10 @@ module_selector(Parent, Node) ->
function_selector(Parent, Node, Module) ->
Functions = observer_wx:try_rpc(Node, Module, module_info, [functions]),
- Choices = lists:sort([{Name, Arity} || {Name, Arity} <- Functions,
- not(erl_internal:guard_bif(Name, Arity))]),
+ Externals = observer_wx:try_rpc(Node, Module, module_info, [exports]),
+
+ Choices = lists:usort([{Name, Arity} || {Name, Arity} <- Externals ++ Functions,
+ not(erl_internal:guard_bif(Name, Arity))]),
ParsedChoices = parse_function_names(Choices),
case check_selector(Parent, ParsedChoices) of
[] -> [{Module, '_', '_'}];