lib/ExtUtils/t/Embed.t: Skip tests is cross-compiling and $Config{cc} is not available

1 files changed, 6 insertions, 4 deletions

diff --git a/lib/ExtUtils/t/Embed.t b/lib/ExtUtils/t/Embed.t
index 192c738629..c02640cd76 100644
--- a/lib/ExtUtils/t/Embed.t
+++ b/lib/ExtUtils/t/Embed.t
@@ -11,10 +11,12 @@ chdir 't';
 use Config;
 use ExtUtils::Embed;
 use File::Spec;
+use IPC::Cmd qw(can_run);
 
-if ( $Config{'usecrosscompile'} ) {
-    print "1..0 # SKIP no toolchain installed when cross-compiling\n";
-    exit 0;
+my $cc = $Config{'cc'};
+if ( $Config{usecrosscompile} && !can_run($cc) ) {
+    print "1..0 # SKIP Cross-compiling and the target doesn't have $cc";
+    exit;
 }
 open(my $fh,">embed_test.c") || die "Cannot open embed_test.c:$!";
 print $fh <DATA>;
@@ -22,7 +24,7 @@ close($fh);
 
 $| = 1;
 print "1..10\n";
-my $cc = $Config{'cc'};
+
 my $cl  = ($^O eq 'MSWin32' && $cc eq 'cl');
 my $skip_exe = $^O eq 'os2' && $Config{ldflags} =~ /(?<!\S)-Zexe\b/;
 my $exe = 'embed_test';