diff options
author | Björn Gustavsson <[email protected]> | 2012-01-28 08:26:48 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2012-02-06 15:13:21 +0100 |
commit | e8d7489adc8c39ecd6255dc160d7e545cb076de3 (patch) | |
tree | ca0310499370451b52530d8b17d1ebc08514e76a | |
parent | d2e689269a0c542ad1f2bc556629e0801a21c9f1 (diff) | |
download | otp-e8d7489adc8c39ecd6255dc160d7e545cb076de3.tar.gz otp-e8d7489adc8c39ecd6255dc160d7e545cb076de3.tar.bz2 otp-e8d7489adc8c39ecd6255dc160d7e545cb076de3.zip |
Skip all inviso test cases if libraries are native-compiled
-rw-r--r-- | lib/inviso/test/inviso_tool_SUITE.erl | 7 | ||||
-rw-r--r-- | lib/runtime_tools/test/inviso_SUITE.erl | 17 |
2 files changed, 17 insertions, 7 deletions
diff --git a/lib/inviso/test/inviso_tool_SUITE.erl b/lib/inviso/test/inviso_tool_SUITE.erl index 6b16e506eb..f8a9cea47f 100644 --- a/lib/inviso/test/inviso_tool_SUITE.erl +++ b/lib/inviso/test/inviso_tool_SUITE.erl @@ -52,7 +52,12 @@ end_per_group(_GroupName, Config) -> %% -----------------------------------------------------------------------------
init_per_suite(Config) ->
- Config.
+ case test_server:is_native(lists) of + true -> + {skip,"Native libs -- tracing doesn't work"}; + false -> + Config + end. %% -----------------------------------------------------------------------------
end_per_suite(_Config) ->
diff --git a/lib/runtime_tools/test/inviso_SUITE.erl b/lib/runtime_tools/test/inviso_SUITE.erl index 758867cf45..33626ffd9e 100644 --- a/lib/runtime_tools/test/inviso_SUITE.erl +++ b/lib/runtime_tools/test/inviso_SUITE.erl @@ -66,13 +66,18 @@ end_per_group(_GroupName, Config) -> init_per_suite(Config) -> - %% No never know who skrewed up this node before this suite! :-) - erlang:trace_pattern({'_','_','_'},[],[local]), - erlang:trace_pattern({'_','_','_'},[],[global]), - erlang:trace(all,false,[all]), + case test_server:is_native(lists) of + true -> + {skip,"Native libs -- tracing doesn't work"}; + false -> + %% We never know who messed up this node before this suite! :-) + erlang:trace_pattern({'_','_','_'},[],[local]), + erlang:trace_pattern({'_','_','_'},[],[global]), + erlang:trace(all,false,[all]), - ?l ok=application:start(runtime_tools), - Config. + ok=application:start(runtime_tools), + Config + end. end_per_suite(_Config) -> ?l ok=application:stop(runtime_tools). |