From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 28 May 2002 13:43:39 +0000 (+0000)
Subject: Test output tweak.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7d63dedd4e5d9316e3ff452dfadcf0da5248c852;p=p5sagit%2Fp5-mst-13.2.git

Test output tweak.

p4raw-id: //depot/perl@16836
---

diff --git a/lib/ExtUtils/t/Embed.t b/lib/ExtUtils/t/Embed.t
index 6cb5cff..5460a25 100644
--- a/lib/ExtUtils/t/Embed.t
+++ b/lib/ExtUtils/t/Embed.t
@@ -133,7 +133,7 @@ my $embed_test = File::Spec->catfile(File::Spec->curdir, $exe);
 $embed_test = "run/nodebug $exe" if $^O eq 'VMS';
 print "# embed_test = $embed_test\n";
 $status = system($embed_test);
-print (($status? 'not ':'')."ok 9 # $status\n");
+print (($status? 'not ':'')."ok 9 # system returned $status\n");
 unlink($exe,"embed_test.c",$obj);
 unlink("$exe$Config{exe_ext}") if $skip_exe;
 unlink("embed_test.map","embed_test.lis") if $^O eq 'VMS';
@@ -183,7 +183,3 @@ int main(int argc, char **argv, char **env)
 
     return 0;
 }
-
-
-
-