[poe-commits] poe/t 02_alarms.t,1.14,1.15 08_errors.t,1.49,1.50

[<rc...@us...>]

Update of /cvsroot/poe/poe/t
In directory sc8-pr-cvs1:/tmp/cvs-serv9325/t

Modified Files:
	02_alarms.t 08_errors.t 
Log Message:
The tests had some timing issues that only show up on the 486.  This
commit makes the tests less timing-sensitive.


Index: 02_alarms.t
===================================================================
RCS file: /cvsroot/poe/poe/t/02_alarms.t,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** 02_alarms.t	9 Jul 2003 18:20:40 -0000	1.14
--- 02_alarms.t	10 Jul 2003 20:17:31 -0000	1.15
***************
*** 171,176 ****
    ok_if( 10, $heap->{test}->{path_ten}   == 1  );
  
!   # Here's where we check the overall run time.
!   ok_unless( 11, time() - $heap->{start_time} > 3 );
  
    # And test alarm order.
--- 171,177 ----
    ok_if( 10, $heap->{test}->{path_ten}   == 1  );
  
!   # Here's where we check the overall run time.  Increased to 5s for
!   # extremely slow, overtaxed machines like my NT test platform.
!   ok_unless( 11, time() - $heap->{start_time} > 5 );
  
    # And test alarm order.

Index: 08_errors.t
===================================================================
RCS file: /cvsroot/poe/poe/t/08_errors.t,v
retrieving revision 1.49
retrieving revision 1.50
diff -C2 -d -r1.49 -r1.50
*** 08_errors.t	9 Jul 2003 18:20:41 -0000	1.49
--- 08_errors.t	10 Jul 2003 20:17:31 -0000	1.50
***************
*** 188,192 ****
  
    if ($^O eq "MSWin32") {
!     print "not " unless $warnings == 16;
    }
    else {
--- 188,192 ----
  
    if ($^O eq "MSWin32") {
!     print "not " unless $warnings == 15;
    }
    else {