aboutsummaryrefslogtreecommitdiffstats
path: root/erts
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2011-12-12 17:31:32 +0100
committerSverker Eriksson <[email protected]>2011-12-19 15:40:36 +0100
commit6fbe6cc27d3a737882952444e948f9bf3b4f47f1 (patch)
tree616cfebf33d56902edd0d41447900aded1de1546 /erts
parenta67091debf20c972dd7ce1a8379fee6673fbe571 (diff)
downloadotp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.tar.gz
otp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.tar.bz2
otp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.zip
erts: Skip nif_SUITE:threading if not supported
Diffstat (limited to 'erts')
-rw-r--r--erts/emulator/test/nif_SUITE.erl8
1 files changed, 7 insertions, 1 deletions
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl
index 370363bf9e..6bd7361612 100644
--- a/erts/emulator/test/nif_SUITE.erl
+++ b/erts/emulator/test/nif_SUITE.erl
@@ -859,7 +859,13 @@ resource_holder(Pid,Reply,List) ->
threading(doc) -> ["Test the threading API functions (reuse tests from driver API)"];
-threading(Config) when is_list(Config) ->
+threading(Config) when is_list(Config) ->
+ case erlang:system_info(threads) of
+ true -> threading_do(Config);
+ false -> {skipped,"No thread support"}
+ end.
+
+threading_do(Config) ->
?line Data = ?config(data_dir, Config),
?line File = filename:join(Data, "tester"),
?line {ok,tester,ModBin} = compile:file(File, [binary,return_errors]),