From a48cc4c4277ae7875bbf28793177c100f1d5784c Mon Sep 17 00:00:00 2001 From: Daniel Dragan Date: Tue, 19 Nov 2013 16:25:51 -0500 Subject: [PATCH] add Intel C++ Compiler for Win32 support -most fixes involve code detecting Perl on VC, and changing it to ICC is another kind of VC, but ICC's version isn't this "other kind of VC"'s version number, call the partner VC to find out the "VC version number" of ICC not yet done -no Intel C specific optimization flags -long doubles and C99 -ccversion behavior might not be ideal/rethink --- README.win32 | 13 +++++++++++++ ext/POSIX/t/posix.t | 9 ++++++--- pod/perldelta.pod | 4 ++++ win32/Makefile | 18 ++++++++++++++++++ win32/config_sh.PL | 14 ++++++++++++-- 5 files changed, 53 insertions(+), 5 deletions(-) diff --git a/README.win32 b/README.win32 index d66ff74..4d91f13 100644 --- a/README.win32 +++ b/README.win32 @@ -40,6 +40,7 @@ system). Currently, this port is capable of using one of the following compilers on the Intel x86 architecture: Microsoft Visual C++ version 6.0 or later + Intel C++ Compiler (experimental, nmake only) Gcc by mingw.org gcc version 3.2 or later Gcc by mingw-w64.sf.net gcc version 4.4.3 or later @@ -312,6 +313,18 @@ L You also need dmake. See L above on how to get it. +=item Intel C++ Compiler + +Experimental support for using Intel C++ Compiler has been added. You must use +nmake, not dmake. Edit win32/Makefile and pick the correct CCTYPE for the +Visual C that Intel C was installed into. Also uncomment __ICC to enable Intel +C on Visual C support. To set up the build enviroment, from the Start Menu run +IA-32 Visual Studio 20__ mode or Intel 64 Visual Studio 20__ mode as +appropriate. Then run nmake as usually in that prompt box. + +Only Intel C++ Compiler v12.1 has been tested. Other versions probably will +work. + =back =head2 Building diff --git a/ext/POSIX/t/posix.t b/ext/POSIX/t/posix.t index 88fe2ca..febf4d8 100644 --- a/ext/POSIX/t/posix.t +++ b/ext/POSIX/t/posix.t @@ -210,9 +210,12 @@ $lc = &POSIX::setlocale(&POSIX::LC_TIME, 'C') if $Config{d_setlocale}; try_strftime("Wed Feb 28 00:00:00 1996 059", 0,0,0, 28,1,96); SKIP: { skip("VC++ 8 and Vista's CRTs regard 60 seconds as an invalid parameter", 1) - if ($Is_W32 and (($Config{cc} eq 'cl' and - $Config{ccversion} =~ /^(\d+)/ and $1 >= 14) or - (Win32::GetOSVersion())[1] >= 6)); + if ($Is_W32 + and (($Config{cc} eq 'cl' and + $Config{ccversion} =~ /^(\d+)/ and $1 >= 14) + or ($Config{cc} eq 'icl' and + `cl --version 2>&1` =~ /^.*Version\s+([\d.]+)/ and $1 >= 14) + or (Win32::GetOSVersion())[1] >= 6)); try_strftime("Thu Feb 29 00:00:60 1996 060", 60,0,-24, 30,1,96); } diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 4e0fc3a..7f9d3e2 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -385,6 +385,10 @@ Support for building with Visual C++ 2013 has been added. There are currently two possible test failures (see L) which will hopefully be resolved soon. +Experimental support for building with Intel C++ Compiler has been added. Only +the nmake makefile (win32/Makefile) can be used. A "nmake test" will not pass +at this time due to "cpan/CGI/t/url.t". + =item WinCE Perl can now be built in one shot with no user intervention on WinCE by running diff --git a/win32/Makefile b/win32/Makefile index c06b377..bdefe90 100644 --- a/win32/Makefile +++ b/win32/Makefile @@ -132,6 +132,11 @@ CCTYPE = MSVC60 #CCTYPE = MSVC120FREE # +# If you are using Intel C++ Compiler uncomment this +# +#__ICC = define + +# # uncomment next line if you want debug version of perl (big,slow) # If not enabled, we automatically try to use maximum optimization # with all compilers that are known to have a working optimizer. @@ -417,8 +422,13 @@ INST_HTML = $(INST_TOP)$(INST_VER)\html # Programs to compile, build .lib files and link # +!IF "$(__ICC)" != "define" CC = cl LINK32 = link +!ELSE +CC = icl +LINK32 = xilink +!ENDIF LIB32 = $(LINK32) -lib RSC = rc @@ -488,6 +498,14 @@ LIBBASEFILES = \ netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib \ version.lib odbc32.lib odbccp32.lib comctl32.lib +# Avoid __intel_new_proc_init link error for libircmt. +# libmmd is /MD equivelent, other variants exist. +# libmmd is Intel C's math addon funcs to MS CRT, contains long doubles, C99, +# and optimized C89 funcs +!IF "$(__ICC)" == "define" +LIBBASEFILES = $(LIBBASEFILES) libircmt.lib libmmd.lib +!ENDIF + # The 64 bit Windows Server 2003 SP1 SDK compilers link against MSVCRT.dll, which # doesn't include the buffer overrun verification code used by the /GS switch. # Since the code links against libraries that are compiled with /GS, this diff --git a/win32/config_sh.PL b/win32/config_sh.PL index d9bfd99..7553b59 100644 --- a/win32/config_sh.PL +++ b/win32/config_sh.PL @@ -93,7 +93,7 @@ else { if (exists $opt{cc}) { # cl version detection borrowed from Test::Smoke's configsmoke.pl - if ($opt{cc} =~ /\bcl/) { #MSVC can come as clarm.exe + if ($opt{cc} =~ /\b(?:cl|icl)/) { #MSVC can come as clarm.exe, icl=Intel C my $output = `$opt{cc} --version 2>&1`; $opt{ccversion} = $output =~ /^.*Version\s+([\d.]+)/ ? $1 : '?'; } @@ -115,7 +115,7 @@ $opt{libpth} = mungepath($opt{libpth}) if exists $opt{libpth}; $opt{incpath} = mungepath($opt{incpath}) if exists $opt{incpath}; my($int64, $int64f); -if ($opt{cc} =~ /\bcl/) { +if ($opt{cc} =~ /\b(?:cl|icl)/) { $int64 = '__int64'; $int64f = 'I64'; } @@ -205,6 +205,16 @@ if ($opt{cc} =~ /\bcl/ and $opt{ccversion} =~ /^(\d+)/) { $opt{ar} ='lib'; } } +#find out which MSVC this ICC is using +elsif ($opt{cc} =~ /\bicl/) { + my $output = `cl --version 2>&1`; + my $num_ver = $output =~ /^.*Version\s+([\d.]+)/ ? $1 : '?'; + if($num_ver =~ /^(\d+)/ && $1 >= 14) { + $opt{sGMTIME_max} = 32535291599; + $opt{sLOCALTIME_max} = 32535244799; + } + $opt{ar} ='xilib'; +} if ($opt{useithreads} eq 'define' && $opt{ccflags} =~ /-DPERL_IMPLICIT_SYS\b/) { $opt{d_pseudofork} = 'define'; -- 2.7.4