diff options
| author | Lars Thorsen <[email protected]> | 2016-05-20 08:02:38 +0200 |
|---|---|---|
| committer | Lars Thorsen <[email protected]> | 2016-06-17 07:51:01 +0200 |
| commit | 7c0a62d3d8083bf1aa8430aad35ad93c2a887de7 (patch) | |
| tree | f74e6f6558a3a96b626b5f1e71131e72233e051d /lib/ic/test/ic_be_SUITE.erl | |
| parent | 7c349de647fa1e56960201a72cc6c0d863137cd8 (diff) | |
| download | otp-7c0a62d3d8083bf1aa8430aad35ad93c2a887de7.tar.gz otp-7c0a62d3d8083bf1aa8430aad35ad93c2a887de7.tar.bz2 otp-7c0a62d3d8083bf1aa8430aad35ad93c2a887de7.zip | |
[ic] Update the test suites to follow the new style
* Eliminate use of ?config(), ?t() and ?line() macros
* Remove the doc and suite clauses
Diffstat (limited to 'lib/ic/test/ic_be_SUITE.erl')
| -rw-r--r-- | lib/ic/test/ic_be_SUITE.erl | 23 |
1 files changed, 4 insertions, 19 deletions
diff --git a/lib/ic/test/ic_be_SUITE.erl b/lib/ic/test/ic_be_SUITE.erl index 2fa28fc103..d5d3038a6e 100644 --- a/lib/ic/test/ic_be_SUITE.erl +++ b/lib/ic/test/ic_be_SUITE.erl @@ -30,7 +30,7 @@ init_per_group/2,end_per_group/2,plain/1]). --define(OUT(X), filename:join([?config(priv_dir, Config), gen, to_list(X)])). +-define(OUT(X), filename:join([proplists:get_value(priv_dir, Config), gen, to_list(X)])). %% Top of cases @@ -56,35 +56,20 @@ end_per_group(_GroupName, Config) -> Config. - - -plain(doc) -> - ["Checking code for the plain backend."]; -plain(suite) -> []; +%% Checking code for the plain backend. plain(Config) when is_list(Config) -> - DataDir = ?config(data_dir, Config), + DataDir = proplists:get_value(data_dir, Config), OutDir = ?OUT(slask), File = filename:join(DataDir, plain), - - ?line ok = ic:gen(File,stdopts(OutDir)++[{be,erl_plain}]), - + ok = ic:gen(File,stdopts(OutDir)++[{be,erl_plain}]), ok. - - - %%-------------------------------------------------------------------- %% %% Utilities - - stdopts(OutDir) -> [{outdir, OutDir}, {maxerrs, infinity}]. - - - - to_list(X) when is_atom(X) -> atom_to_list(X); to_list(X) -> X. |