testsuite adjustments

	Message-Id: <E10EEH3-0003Wf-00@taurus.cus.cam.ac.uk>
	Subject: Not quite OK: perl5.005_55 on SunOS 4.1.3 / gcc

p4raw-id: //depot/perl@3016

diff --git a/t/lib/io_sock.t b/t/lib/io_sock.t
index b1189a0..79be190 100755 (executable)
--- a/t/lib/io_sock.t
+++ b/t/lib/io_sock.t
@@ -124,7 +124,7 @@ if($pid = fork()) {
     }
 
     # some machines seem to suffer from a race condition here
-#    sleep(1);
+    sleep(1);
 
     $sock = IO::Socket::INET->new("127.0.0.1:$port");
     if ($sock) {

diff --git a/t/op/lex_assign.t b/t/op/lex_assign.t
index e45f8ea..cf16a46 100755 (executable)
--- a/t/op/lex_assign.t
+++ b/t/op/lex_assign.t
@@ -196,8 +196,8 @@ getpgrp                             # getpgrp
 getpriority $$, $$             # getpriority
 '???'                          # setpriority
 time                           # time
-localtime                      # localtime
-gmtime                         # gmtime
+localtime $^T                  # localtime
+gmtime $^T                     # gmtime
 sleep 1                                # sleep
 '???'                          # alarm
 '???'                          # shmget