This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Let's require fork for this test.
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 8 Sep 2003 08:50:27 +0000 (08:50 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 8 Sep 2003 08:50:27 +0000 (08:50 +0000)
p4raw-id: //depot/perl@21076

lib/perl5db/de0.t

index d626dd4..a3ad5a7 100644 (file)
@@ -2,10 +2,7 @@
 
 BEGIN {
     require Config; import Config;
-    if (!$Config{'d_fork'}
-       # open2/3 supported on win32 (but not Borland due to CRT bugs)
-       && (($^O ne 'MSWin32' && $^O ne 'NetWare') || $Config{'cc'} =~ /^bcc/i))
-    {
+    unless ($Config{d_fork}) {
        print "1..0\n";
        exit 0;
     }