module TestingModule
  # This module assumes use as a mixin within
  # a test class which defines @testClass.
  
  def test_120_tasks_every_second_with_ms_task
    min_time = 1
    rl = @testClass.new 120, min_time
    delta = timed_run(rl) { sleep 0.001 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time
  end
  
  def test_120_tasks_every_quarter_second_with_ms_task
    min_time = 0.25
    rl = @testClass.new 120, min_time
    delta = timed_run(rl) { sleep 0.001 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time
  end
  
  def test_120_tasks_every_second_with_cenisecond_task
    min_time = 1
    rl = @testClass.new 120, min_time
    delta = timed_run(rl) { sleep 0.01 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time
  end
  
  def test_50_tasks_every_second_with_fast_task
    min_time = 1
    rl = @testClass.new 50, min_time
    delta = timed_run(rl) { sleep 0 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time
  end
  
  def test_1_task_every_1_seconds_with_1_second_task
    min_time = 1
    rl = @testClass.new 1, min_time
    delta = timed_run(rl) { sleep 1 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time
  end
  
  def test_5_tasks_every_quarter_second_four_runs_with_ms_task
    min_time = 0.25
    rl = @testClass.new 1, min_time
    delta = timed_run(rl, 4) { sleep 0.001 }
    #puts "#{delta} >? #{min_time}"
    assert delta > min_time * 4
  end
  
  def test_120_tasks_every_half_second_two_runs_with_no_task
    min_time = 0.5
    rl = @testClass.new 120, min_time
    delta = timed_run(rl, 2) { sleep 0 }
    assert delta > min_time * 2
  end
  
  def test_10_tasks_every_1_seconds_two_runs_with_short_rnd_task
    min_time = 1
    rl = @testClass.new 10, min_time
    delta = timed_run(rl, 2) { sleep(0.2 * rand) }
    assert delta > min_time * 2
  end
  
end