This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
undo change#1379 (order of tests *is* significant)
authorGurusamy Sarathy <gsar@cpan.org>
Fri, 10 Jul 1998 03:24:45 +0000 (03:24 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Fri, 10 Jul 1998 03:24:45 +0000 (03:24 +0000)
p4raw-link: @1379 on //depot/perl: 5e8184afa853952a09122e5fa8842a8d0c217820

p4raw-id: //depot/perl@1401

t/lib/posix.t

index b71cb43..c071c3b 100755 (executable)
@@ -53,16 +53,13 @@ print "ok 11\n";
 
 sub SigHUP {
     print "ok 8\n";
-    $n = 8;
     kill 'INT', $$;
     sleep 2;
-    ++$n;
-    print "ok $n\n";
+    print "ok 9\n";
 }
 
 sub SigINT {
-    ++$n;
-    print "ok $n\n";
+    print "ok 10\n";
 }
 }