--- EV/t/01_timer.t	2007/11/13 02:43:26	1.1
+++ EV/t/01_timer.t	2007/11/17 01:41:33	1.2
@@ -11,8 +11,10 @@
 for (1..1000) {
    my $t = $_ * $_ * 1.735435336; $t -= int $t;
    push @timer, EV::timer $t, 0, sub {
-      print EV::now >= $prev ? "" : "not ", "ok ", ++$id, "\n";
-      print EV::now >= $base + $t ? "" : "not ", "ok ", ++$id, "\n";
+      print EV::now >= $prev      ? "" : "not ", "ok ", ++$id, " # a ", EV::now, " >= ", $prev, "\n";
+      print EV::now >= $base + $t ? "" : "not ", "ok ", ++$id, " # b ", EV::now, " >= ", $base + $t, "\n";
+
+      $prev = EV::now;
 
       unless ($id % 3) {
          $_[0]->set ($t * 0.0625);