diff options
| author | Sverker Eriksson <[email protected]> | 2011-12-12 17:31:32 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2011-12-19 15:40:36 +0100 |
| commit | 6fbe6cc27d3a737882952444e948f9bf3b4f47f1 (patch) | |
| tree | 616cfebf33d56902edd0d41447900aded1de1546 /erts/emulator/test/nif_SUITE.erl | |
| parent | a67091debf20c972dd7ce1a8379fee6673fbe571 (diff) | |
| download | otp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.tar.gz otp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.tar.bz2 otp-6fbe6cc27d3a737882952444e948f9bf3b4f47f1.zip | |
erts: Skip nif_SUITE:threading if not supported
Diffstat (limited to 'erts/emulator/test/nif_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/nif_SUITE.erl | 8 |
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]), |