diff options
author | Björn Gustavsson <[email protected]> | 2017-10-26 14:38:53 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2017-10-26 14:38:53 +0200 |
commit | ed3f937470b1ffcdebd26b96d4282063a58de3cb (patch) | |
tree | 4e53097147ea3877b7054fbe68bb729efe850251 | |
parent | 56455ce5b80087cd661ac3343f96c5a3df2f9f9c (diff) | |
download | otp-ed3f937470b1ffcdebd26b96d4282063a58de3cb.tar.gz otp-ed3f937470b1ffcdebd26b96d4282063a58de3cb.tar.bz2 otp-ed3f937470b1ffcdebd26b96d4282063a58de3cb.zip |
Skip compile_SUITE:pre_load_check/1 when code is native-compiled
Tracing won't work on modules that are native-compiled.
-rw-r--r-- | lib/compiler/test/compile_SUITE.erl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/compiler/test/compile_SUITE.erl b/lib/compiler/test/compile_SUITE.erl index 25983c6012..f7a5b657bd 100644 --- a/lib/compiler/test/compile_SUITE.erl +++ b/lib/compiler/test/compile_SUITE.erl @@ -1319,10 +1319,13 @@ do_warnings_2([], Next, F) -> %% pre-loads the modules that are used by a typical compilation. pre_load_check(Config) -> - case test_server:is_cover() of - true -> + case {test_server:is_cover(),code:module_info(native)} of + {true,_} -> {skip,"Cover is running"}; - false -> + {false,true} -> + %% Tracing won't work. + {skip,"'code' is native-compiled"}; + {false,false} -> try do_pre_load_check(Config) after |