diff options
| author | Lukas Larsson <[email protected]> | 2010-12-14 18:21:28 +0100 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2011-02-17 17:39:00 +0100 |
| commit | d8a27daee264991e14def9b2e40f10c8f6d8e4d3 (patch) | |
| tree | b10b1794da27e40a58d9803d80a88459f476b3e4 /erts/emulator/test/old_scheduler_SUITE.erl | |
| parent | 9c2305c5e388e966a47205fa70542e46a0f90913 (diff) | |
| download | otp-d8a27daee264991e14def9b2e40f10c8f6d8e4d3.tar.gz otp-d8a27daee264991e14def9b2e40f10c8f6d8e4d3.tar.bz2 otp-d8a27daee264991e14def9b2e40f10c8f6d8e4d3.zip | |
Fix formatting for emulator
Diffstat (limited to 'erts/emulator/test/old_scheduler_SUITE.erl')
| -rw-r--r-- | erts/emulator/test/old_scheduler_SUITE.erl | 28 |
1 files changed, 15 insertions, 13 deletions
diff --git a/erts/emulator/test/old_scheduler_SUITE.erl b/erts/emulator/test/old_scheduler_SUITE.erl index fb9e9dcd64..51a4943dd9 100644 --- a/erts/emulator/test/old_scheduler_SUITE.erl +++ b/erts/emulator/test/old_scheduler_SUITE.erl @@ -21,7 +21,9 @@ -include_lib("test_server/include/test_server.hrl"). --export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1, init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]). +-export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1, + init_per_group/2,end_per_group/2, + init_per_testcase/2, end_per_testcase/2]). -export([equal/1, many_low/1, few_low/1, max/1, high/1]). -define(default_timeout, ?t:minutes(11)). @@ -29,15 +31,15 @@ suite() -> [{suite_callbacks,[ts_install_scb]}]. all() -> -case catch erlang:system_info(modified_timing_level) of - Level when is_integer(Level) -> - {skipped, - "Modified timing (level " ++ - integer_to_list(Level) ++ - ") is enabled. Testcases gets messed " - "up by modfied timing."}; - _ -> [equal, many_low, few_low, max, high] -end. + case catch erlang:system_info(modified_timing_level) of + Level when is_integer(Level) -> + {skipped, + "Modified timing (level " ++ + integer_to_list(Level) ++ + ") is enabled. Testcases gets messed " + "up by modfied timing."}; + _ -> [equal, many_low, few_low, max, high] + end. groups() -> []. @@ -49,10 +51,10 @@ end_per_suite(_Config) -> ok. init_per_group(_GroupName, Config) -> - Config. + Config. end_per_group(_GroupName, Config) -> - Config. + Config. %%----------------------------------------------------------------------------------- @@ -81,7 +83,7 @@ init_per_testcase(_Case, Config) -> ?line MS = erlang:system_flag(multi_scheduling, block), [{prio,Prio},{watchdog,Dog},{multi_scheduling, MS}|Config]. -fin_per_testcase(_Case, Config) -> +end_per_testcase(_Case, Config) -> erlang:system_flag(multi_scheduling, unblock), Dog=?config(watchdog, Config), Prio=?config(prio, Config), |