[svn:ExtUtils-CBuilder] r12922 - in ExtUtils-CBuilder/trunk: . t

Author: dagolden
Date: Fri Jun 26 13:18:05 2009
New Revision: 12922

Modified:
   ExtUtils-CBuilder/trunk/Changes
   ExtUtils-CBuilder/trunk/t/02-link.t

Log:
minor diagnostic improvements

Modified: ExtUtils-CBuilder/trunk/Changes
==============================================================================
--- ExtUtils-CBuilder/trunk/Changes	(original)
+++ ExtUtils-CBuilder/trunk/Changes	Fri Jun 26 13:18:05 2009
@@ -2,6 +2,8 @@
 
 0.25 - coming soon
 
+ - Slight diagnostic improvements in link.t
+
 0.24_01 - Sun Mar  8 14:50:10 2009
 
  - On Windows, don't generate "mt" command when CRT is statically

Modified: ExtUtils-CBuilder/trunk/t/02-link.t
==============================================================================
--- ExtUtils-CBuilder/trunk/t/02-link.t	(original)
+++ ExtUtils-CBuilder/trunk/t/02-link.t	Fri Jun 26 13:18:05 2009
@@ -49,7 +49,7 @@
 # Link
 my ($exe_file, @temps);
 ($exe_file, @temps) = $b->link_executable(objects => $object_file);
-ok $exe_file;
+ok -e $exe_file;
 
 if ($^O eq 'os2') {		# Analogue of LDLOADPATH...
 	# Actually, not needed now, since we do not link with the generated DLL
@@ -60,7 +60,10 @@
 }
 
 # Try the executable
-ok my_system($exe_file), 11;
+my $ec = my_system($exe_file);
+ok $ec, 11
+  or print( $? == -1 ? "# Could not run '$exe_file'\n" 
+                     : "# Unexpected exit code '$ec'\n");
 
 # Clean up
 for ($source_file, $object_file, $exe_file) {