diff options
| author | Sverker Eriksson <[email protected]> | 2014-02-05 18:04:37 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2014-02-05 18:04:37 +0100 |
| commit | c3fb1d51b73867a9045171e812cc0acb82126edd (patch) | |
| tree | fcf1989768b360e9b01aa0fe3a5e74b4d9dfc28b /erts/emulator/test/driver_SUITE.erl | |
| parent | eb3aa83b0e93c766309a99a5c7e6c251ee90275a (diff) | |
| download | otp-c3fb1d51b73867a9045171e812cc0acb82126edd.tar.gz otp-c3fb1d51b73867a9045171e812cc0acb82126edd.tar.bz2 otp-c3fb1d51b73867a9045171e812cc0acb82126edd.zip | |
erts: Skip driver_SUITE:thr_free_drv for VM without threads
Diffstat (limited to 'erts/emulator/test/driver_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/driver_SUITE.erl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/erts/emulator/test/driver_SUITE.erl b/erts/emulator/test/driver_SUITE.erl index 06211406b4..c62bc0c454 100644 --- a/erts/emulator/test/driver_SUITE.erl +++ b/erts/emulator/test/driver_SUITE.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1997-2013. All Rights Reserved. +%% Copyright Ericsson AB 1997-2014. 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 @@ -1945,6 +1945,14 @@ otp_9302(Config) when is_list(Config) -> end. thr_free_drv(Config) when is_list(Config) -> + case erlang:system_info(threads) of + false -> + {skipped, "No thread support"}; + true -> + thr_free_drv_do(Config) + end. + +thr_free_drv_do(Config) -> ?line Path = ?config(data_dir, Config), ?line erl_ddll:start(), ?line ok = load_driver(Path, thr_free_drv), |