diff options
| author | Lukas Larsson <[email protected]> | 2010-10-12 10:33:30 +0200 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2011-02-17 17:20:43 +0100 |
| commit | 65ff8409203e7154f4fbe03ed9d76ca7c1362eaf (patch) | |
| tree | 95485a9b8af913486b2fae589413a65c55385b36 /lib/stdlib/test/erl_scan_SUITE.erl | |
| parent | 9a1c2c32a199e05fb717403880d040e4d55798b3 (diff) | |
| download | otp-65ff8409203e7154f4fbe03ed9d76ca7c1362eaf.tar.gz otp-65ff8409203e7154f4fbe03ed9d76ca7c1362eaf.tar.bz2 otp-65ff8409203e7154f4fbe03ed9d76ca7c1362eaf.zip | |
Update stdlib tests to conform with common_test standard
Diffstat (limited to 'lib/stdlib/test/erl_scan_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/erl_scan_SUITE.erl | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/lib/stdlib/test/erl_scan_SUITE.erl b/lib/stdlib/test/erl_scan_SUITE.erl index 002645f3c3..5a98890ba7 100644 --- a/lib/stdlib/test/erl_scan_SUITE.erl +++ b/lib/stdlib/test/erl_scan_SUITE.erl @@ -17,9 +17,9 @@ %% %CopyrightEnd% -module(erl_scan_SUITE). --export([all/1]). +-export([all/0,groups/0,init_per_group/2,end_per_group/2]). --export([error/1, error_1/1, error_2/1, iso88591/1, otp_7810/1]). +-export([ error_1/1, error_2/1, iso88591/1, otp_7810/1]). -import(lists, [nth/2,flatten/1]). -import(io_lib, [print/1]). @@ -39,7 +39,7 @@ %% config(data_dir, _) -> %% ".". -else. --include("test_server.hrl"). +-include_lib("test_server/include/test_server.hrl"). -export([init_per_testcase/2, end_per_testcase/2]). init_per_testcase(_Case, Config) when is_list(Config) -> @@ -55,15 +55,19 @@ end_per_testcase(_Case, Config) -> % Default timetrap timeout (set in init_per_testcase). -define(default_timeout, ?t:minutes(1)). -all(doc) -> - ["Test cases for the 'erl_scan' module."]; -all(suite) -> - [error,iso88591,otp_7810]. +all() -> +[{group, error}, iso88591, otp_7810]. + +groups() -> + [{error, [], [error_1, error_2]}]. + +init_per_group(_GroupName, Config) -> + Config. + +end_per_group(_GroupName, Config) -> + Config. + -error(doc) -> - ["Error cases"]; -error(suite) -> - [error_1, error_2]. error_1(doc) -> ["(OTP-2347)"]; |