aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/y2k_SUITE.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-02-28 14:10:25 +0100
committerBjörn Gustavsson <[email protected]>2016-03-09 13:20:01 +0100
commit03ec5bc984264feee907408e720015e2bd9b6108 (patch)
tree9ef15f88514aeb1f9dc612ef38a706ae42d0c750 /lib/stdlib/test/y2k_SUITE.erl
parent11603b076ff9fe8ee1b0687db5dc8411fae318d4 (diff)
downloadotp-03ec5bc984264feee907408e720015e2bd9b6108.tar.gz
otp-03ec5bc984264feee907408e720015e2bd9b6108.tar.bz2
otp-03ec5bc984264feee907408e720015e2bd9b6108.zip
Eliminate 'suite' and 'doc' clauses
Diffstat (limited to 'lib/stdlib/test/y2k_SUITE.erl')
-rw-r--r--lib/stdlib/test/y2k_SUITE.erl46
1 files changed, 11 insertions, 35 deletions
diff --git a/lib/stdlib/test/y2k_SUITE.erl b/lib/stdlib/test/y2k_SUITE.erl
index d80dd10631..fb95df9440 100644
--- a/lib/stdlib/test/y2k_SUITE.erl
+++ b/lib/stdlib/test/y2k_SUITE.erl
@@ -55,10 +55,7 @@ end_per_group(_GroupName, Config) ->
Config.
-date_1999_01_01(doc) ->
- "#1 : 1999-01-01: test roll-over from 1998-12-31 to 1999-01-01.";
-date_1999_01_01(suite) ->
- [];
+%% #1 : 1999-01-01: test roll-over from 1998-12-31 to 1999-01-01.
date_1999_01_01(Config) when is_list(Config) ->
?line Date = {1998, 12, 31}, NextDate = {1999, 1, 1},
?line match(next_date(Date), NextDate),
@@ -78,29 +75,20 @@ date_1999_01_01(Config) when is_list(Config) ->
ok
end.
-date_1999_02_28(doc) ->
- "#2 : 1999-02-28: test roll-over from 1999-02-28 to 1999-03-01.";
-date_1999_02_28(suite) ->
- [];
+%% #2 : 1999-02-28: test roll-over from 1999-02-28 to 1999-03-01.
date_1999_02_28(Config) when is_list(Config) ->
?line Date = {1999, 2, 28}, NextDate = {1999, 3, 1},
?line match(next_date(Date), NextDate),
?line match(tz_next_date(Date), NextDate).
-date_1999_09_09(doc) ->
- "#3 : 1999-09-09: test roll-over from 1999-09-08 to 1999-09-09.";
-date_1999_09_09(suite) ->
- [];
+%% #3 : 1999-09-09: test roll-over from 1999-09-08 to 1999-09-09.
date_1999_09_09(Config) when is_list(Config) ->
?line Date = {1999, 9, 8}, NextDate = {1999, 9, 9},
?line match(next_date(Date), NextDate),
?line match(tz_next_date(Date), NextDate).
-date_2000_01_01(doc) ->
- "#4 : 2000-01-01: test roll-over from 1999-12-31 to 2000-01-01 to "
- "2000-01-02.";
-date_2000_01_01(suite) ->
- [];
+%% #4 : 2000-01-01: test roll-over from 1999-12-31 to 2000-01-01 to
+%% 2000-01-02.;
date_2000_01_01(Config) when is_list(Config) ->
?line Date = {1999, 12, 31}, NextDate = {2000, 1, 1},
?line match(next_date(Date), NextDate),
@@ -109,11 +97,8 @@ date_2000_01_01(Config) when is_list(Config) ->
?line match(next_date(NextDate), NextDate1),
?line match(tz_next_date(NextDate), NextDate1).
-date_2000_02_29(doc) ->
- "#5 : 2000-02-29: test roll-over from 2000-02-28 to 2000-02-29 to "
- "2000-03-01.";
-date_2000_02_29(suite) ->
- [];
+%% #5 : 2000-02-29: test roll-over from 2000-02-28 to 2000-02-29 to
+%% 2000-03-01.
date_2000_02_29(Config) when is_list(Config) ->
?line Date = {2000, 2, 28}, NextDate = {2000, 2, 29},
?line match(next_date(Date), NextDate),
@@ -122,29 +107,20 @@ date_2000_02_29(Config) when is_list(Config) ->
?line match(next_date(NextDate), NextDate1),
?line match(tz_next_date(NextDate), NextDate1).
-date_2001_01_01(doc) ->
- "#6 : 2001-01-01: test roll-over from 2000-12-31 to 2001-01-01.";
-date_2001_01_01(suite) ->
- [];
+%% #6 : 2001-01-01: test roll-over from 2000-12-31 to 2001-01-01.
date_2001_01_01(Config) when is_list(Config) ->
?line Date = {2000, 12, 31}, NextDate = {2001, 1, 1},
?line match(next_date(Date), NextDate),
?line match(tz_next_date(Date), NextDate).
-date_2001_02_29(doc) ->
- "#7 : 2001-02-29: test roll-over from 2001-02-28 to 2001-03-01.";
-date_2001_02_29(suite) ->
- [];
+%% #7 : 2001-02-29: test roll-over from 2001-02-28 to 2001-03-01.
date_2001_02_29(Config) when is_list(Config) ->
?line Date = {2001, 2, 28}, NextDate = {2001, 3, 1},
?line match(next_date(Date), NextDate),
?line match(tz_next_date(Date), NextDate).
-date_2004_02_29(doc) ->
- "#8 : 2004-02-29: test roll-over from 2004-02-28 to 2004-02-29 to "
- "2004-03-01.";
-date_2004_02_29(suite) ->
- [];
+%% #8 : 2004-02-29: test roll-over from 2004-02-28 to 2004-02-29 to
+%% 2004-03-01.
date_2004_02_29(Config) when is_list(Config) ->
?line Date = {2004, 2, 28}, NextDate = {2004, 2, 29},
?line match(next_date(Date), NextDate),