From: Max Maischein <corion@corion.net>
Date: Mon, 26 Jan 2009 20:49:22 +0000 (+0100)
Subject: Make t/win32/system.t use the more common compiler check
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4497a157d1131e07b218838ce27e77bd3ed118d0;p=p5sagit%2Fp5-mst-13.2.git

Make t/win32/system.t use the more common compiler check

Hello again,

much of the Perl test suite uses $Config{cc} =~ /^gcc/i to determine
whether the compiler looks/acts like gcc. This patch enables that
behaviour in t/win32/system.t too.

The reason behind this is that I have a batch file named gcc-ccache.cmd,
which I give to dmake as my compiler, and having things like this work
everywhere in Perl is nice.

Possibly, a more sane way of keeping the kind of compiler handy would be
to make $Config{CCTYPE} come into existence and have it store "gcc",
"msvc" and what other cc types we support.

-max

From f2e73cb5249433631fd4db5b46f62d05ff35526c Mon Sep 17 00:00:00 2001
From: Max Maischein <corion@corion.net>
Date: Mon, 26 Jan 2009 21:44:36 +0100
Subject: [PATCH] Unbreak the test if your compiler looks like gcc
---

diff --git a/t/win32/system.t b/t/win32/system.t
index fb7a1d1..1ed5fe9 100644
--- a/t/win32/system.t
+++ b/t/win32/system.t
@@ -113,7 +113,7 @@ if (open(my $EIN, "$cwd/win32/${exename}_exe.uu")) {
 }
 else {
     my $minus_o = '';
-    if ($Config{cc} eq 'gcc')
+    if ($Config{cc} =~ /^gcc/i)
      {
       $minus_o = "-o $exename.exe";
      }