5 use tests::threads::mlfqs;
8 my (@output) = read_text_file ("$test.output");
9 common_checks ("run", @output);
10 @output = get_core_output ("run", @output);
16 my ($t, $recent_cpu) = /After (\d+) seconds, recent_cpu is (\d+\.\d+),/
18 $actual[$t] = $recent_cpu;
21 # Calculate expected values.
22 my ($expected_load_avg, $expected_recent_cpu)
23 = mlfqs_expected_load ([(1) x 180], [(100) x 180]);
24 my (@expected) = @$expected_recent_cpu;
26 # Compare actual and expected values.
27 mlfqs_compare ("time", "%.2f", \@actual, \@expected, 2.5, [2, 178, 2],
28 "Some recent_cpu values were missing or "
29 . "differed from those expected "
30 . "by more than 2.5.");