diff options
author | Dan Gudmundsson <dgud@erlang.org> | 2012-04-20 16:01:54 +0200 |
---|---|---|
committer | Dan Gudmundsson <dgud@erlang.org> | 2012-04-27 12:47:48 +0200 |
commit | 9ac8b28e0ce7708acc4227eab9a5b869bbb90d4f (patch) | |
tree | 07ffe3601b4e27d11a6c407b7e913cc26bb2e114 /lib | |
parent | b27c73232804f28b169e67ffa5793a76a7918279 (diff) | |
download | otp-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')
-rw-r--r-- | lib/observer/src/observer_traceoptions_wx.erl | 8 |
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, '_', '_'}]; |