diff options
| author | Björn Gustavsson <[email protected]> | 2016-03-07 15:40:53 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2016-03-07 15:40:53 +0100 |
| commit | 78205a14b3158c977581a9982a701f305c1103ec (patch) | |
| tree | b0ae257611c52c5b37cf8a2b1a336aa2a051c146 | |
| parent | 204b6be5b5d9a641404ae6cdf67faf0a3f542a98 (diff) | |
| download | otp-78205a14b3158c977581a9982a701f305c1103ec.tar.gz otp-78205a14b3158c977581a9982a701f305c1103ec.tar.bz2 otp-78205a14b3158c977581a9982a701f305c1103ec.zip | |
Skip erl_prim_loader_SUITE:get_modules/1 when cover-compiled
code:which/1 will return 'cover_compiled' instead of a path. We
could work around that, but since erl_prim_loader is not
cover-compiled, it does not gain us anything.
| -rw-r--r-- | lib/kernel/test/erl_prim_loader_SUITE.erl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/kernel/test/erl_prim_loader_SUITE.erl b/lib/kernel/test/erl_prim_loader_SUITE.erl index bccca59b93..14d33cd330 100644 --- a/lib/kernel/test/erl_prim_loader_SUITE.erl +++ b/lib/kernel/test/erl_prim_loader_SUITE.erl @@ -112,6 +112,12 @@ get_file(Config) when is_list(Config) -> ok. get_modules(_Config) -> + case test_server:is_cover() of + false -> do_get_modules(); + true -> {skip,"Cover"} + end. + +do_get_modules() -> MsGood = lists:sort([lists,gen_server,gb_trees,code_server]), Ms = [certainly_not_existing|MsGood], SuccExp = [begin |