Change 28597 by [EMAIL PROTECTED] on 2006/07/18 12:11:36
Fix Borland problem with quoted pre-processor macros in response files
This should clear up the errors from Module/Build/t/ppm.t and
Module/Build/t/xs.t in the Borland smokes.
Subject: Re: Smoke [5.9.4] 27656 FAIL(F) MSWin32 WinXP/.Net SP2 (x86/2
cpu)
From: "Randy W. Sims" <[EMAIL PROTECTED]>
Date: Thu, 06 Apr 2006 22:33:04 -0400
Message-ID: <[EMAIL PROTECTED]>
See the thread here for details:
http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2006-04/msg00027.html
Affected files ...
... //depot/perl/lib/ExtUtils/CBuilder/Platform/Windows.pm#7 edit
Differences ...
==== //depot/perl/lib/ExtUtils/CBuilder/Platform/Windows.pm#7 (text) ====
Index: perl/lib/ExtUtils/CBuilder/Platform/Windows.pm
--- perl/lib/ExtUtils/CBuilder/Platform/Windows.pm#6~27531~ 2006-03-17
05:18:38.000000000 -0800
+++ perl/lib/ExtUtils/CBuilder/Platform/Windows.pm 2006-07-18
05:11:36.000000000 -0700
@@ -9,7 +9,7 @@
use ExtUtils::CBuilder::Base;
use vars qw($VERSION @ISA);
-$VERSION = '0.12';
+$VERSION = '0.12_01';
@ISA = qw(ExtUtils::CBuilder::Base);
sub new {
@@ -437,11 +437,16 @@
open( SCRIPT, ">$script" )
or die( "Could not create script '$script': $!" );
+ # XXX Borland "response files" seem to be unable to accept macro
+ # definitions containing quoted strings. Escaping strings with
+ # backslash doesn't work, and any level of quotes are stripped. The
+ # result is is a floating point number in the source file where a
+ # string is expected. So we leave the macros on the command line.
print SCRIPT join( "\n",
map { ref $_ ? @{$_} : $_ }
grep defined,
delete(
- @spec{ qw(includes cflags optimize defines perlinc) } )
+ @spec{ qw(includes cflags optimize perlinc) } )
);
close SCRIPT;
End of Patch.
