This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
stop Math/BigInt/t/bare_mbf.t producing spurious test output
authorDave Mitchell <davem@fdisolutions.com>
Thu, 5 May 2005 12:06:32 +0000 (12:06 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Thu, 5 May 2005 12:06:32 +0000 (12:06 +0000)
p4raw-id: //depot/perl@24393

lib/Math/BigInt/t/bare_mbf.t

index 29a73a0..1cd56c0 100644 (file)
@@ -8,7 +8,7 @@ BEGIN
   $| = 1;
   # to locate the testing files
   my $location = $0; $location =~ s/bare_mbf.t//i;
-  print "$0\n";
+  print "#$0\n";
   if ($ENV{PERL_CORE})
     {
     # testing with the core distribution