Skip to content
Browse files

etop_SUITE: Skip a test case if libraries are native-compiled

  • Loading branch information...
1 parent e8d7489 commit fd79b0246a1da9fdb84926a3e31e516c76cf0b2d @bjorng bjorng committed Jan 29, 2012
Showing with 8 additions and 5 deletions.
  1. +8 −5 lib/observer/test/etop_SUITE.erl
View
13 lib/observer/test/etop_SUITE.erl
@@ -57,11 +57,14 @@ end_per_group(_GroupName, Config) ->
Config.
-text(suite) ->
- [];
-text(doc) ->
- ["Start etop with text presentation"];
-text(Config) when is_list(Config) ->
+%% Start etop with text presentation
+text(_) ->
+ case test_server:is_native(lists) of
+ true -> {skip,"Native libs -- tracing does not work"};
+ false -> text()
+ end.
+
+text() ->
?line {ok,Node} = ?t:start_node(node2,peer,[]),
%% Must spawn this process, else the test case will never end.

0 comments on commit fd79b02

Please sign in to comment.
Something went wrong with that request. Please try again.