diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2015-06-09 16:17:00 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2015-06-09 16:17:00 +0200 |
| commit | 2430a12be964410acaff3fc499419bda7038e76c (patch) | |
| tree | ae86153d2fcc81d0964be742c7e2a8f9bd9b439f /erts/emulator | |
| parent | 07995bee41aeaace06e5a3e11912122e710552f5 (diff) | |
| download | otp-2430a12be964410acaff3fc499419bda7038e76c.tar.gz otp-2430a12be964410acaff3fc499419bda7038e76c.tar.bz2 otp-2430a12be964410acaff3fc499419bda7038e76c.zip | |
erts: Tweak statistics_SUITE:scheduler_wall_time/1
Diffstat (limited to 'erts/emulator')
| -rw-r--r-- | erts/emulator/test/statistics_SUITE.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/erts/emulator/test/statistics_SUITE.erl b/erts/emulator/test/statistics_SUITE.erl index c428be6c5a..16cee81158 100644 --- a/erts/emulator/test/statistics_SUITE.erl +++ b/erts/emulator/test/statistics_SUITE.erl @@ -308,7 +308,7 @@ scheduler_wall_time(Config) when is_list(Config) -> try Schedulers = erlang:system_info(schedulers_online), %% Let testserver and everyone else finish their work - timer:sleep(500), + timer:sleep(1500), %% Empty load EmptyLoad = get_load(), {false, _} = {lists:any(fun(Load) -> Load > 50 end, EmptyLoad),EmptyLoad}, @@ -347,7 +347,7 @@ scheduler_wall_time(Config) when is_list(Config) -> [exit(Pid, kill) || Pid <- [P1|HalfHogs++LastHogs]], AfterLoad = get_load(), - {false,_} = {lists:any(fun(Load) -> Load > 5 end, AfterLoad),AfterLoad}, + {false,_} = {lists:any(fun(Load) -> Load > 25 end, AfterLoad),AfterLoad}, true = erlang:system_flag(scheduler_wall_time, false) after erlang:system_flag(scheduler_wall_time, false) @@ -355,7 +355,7 @@ scheduler_wall_time(Config) when is_list(Config) -> get_load() -> Start = erlang:statistics(scheduler_wall_time), - timer:sleep(500), + timer:sleep(1500), End = erlang:statistics(scheduler_wall_time), lists:reverse(lists:sort(load_percentage(lists:sort(Start),lists:sort(End)))). |