From: Nicholas Clark Date: Sat, 1 Apr 2006 15:21:56 +0000 (+0000) Subject: If the comment says "(and not ours)" then it should be tested. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bd5a473b14ab0ddcc6e647d00ffa52195c32018d;p=p5sagit%2Fp5-mst-13.2.git If the comment says "(and not ours)" then it should be tested. p4raw-id: //depot/perl@27662 --- diff --git a/t/op/getppid.t b/t/op/getppid.t index cb069ff..70c5a32 100644 --- a/t/op/getppid.t +++ b/t/op/getppid.t @@ -23,7 +23,7 @@ BEGIN { } } require './test.pl'; - plan (7); + plan (8); } sub fork_and_retrieve { @@ -69,3 +69,4 @@ sub fork_and_retrieve { my $first = fork_and_retrieve("first"); my $second = fork_and_retrieve("second"); is ($first, $second, "Both orphaned grandchildren get the same new parent"); +isnt ($first, $$, "And that new parent isn't this process");