Author: leo
Date: Wed Apr 13 01:16:36 2005
New Revision: 7820
Modified:
trunk/config/init/hints/mswin32.pl
trunk/config/init/hints/msys.pl
Log:
[perl #34910] [PATCH] t/pmc/nci.t failure with MinGW32
Just use gcc with good parameters for build DLL.
Courtesy of François Perrad <[EMAIL PROTECTED]>
Modified: trunk/config/init/hints/mswin32.pl
==============================================================================
--- trunk/config/init/hints/mswin32.pl (original)
+++ trunk/config/init/hints/mswin32.pl Wed Apr 13 01:16:36 2005
@@ -153,20 +153,24 @@
'ccflags' => '-s -O2 -DWIN32 ',
'cp' => 'copy',
'ld' => 'g++',
- 'ld_load_flags' => '-mdll -s ',
- 'ld_share_flags' => '-mdll -s ',
+ 'ld_load_flags' => '-shared ',
+ 'ld_share_flags' => '-shared libparrot.def ',
'ldflags' => '-s ',
'libs' => '-lmsvcrt -lmoldname -lkernel32
-luser32 -lgdi32 -lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32
-lnetapi32 -luuid -lws2_32 -lmpr -lwinmm -lversion -lodbc32 ',
'link' => 'gcc',
'linkflags' => '-s ',
'make' => 'mingw32-make',
+ 'ncilib_link_extra' => 'src/libnci_test.def',
'o' => '.o',
);
} elsif ($make =~ /dmake/i) {
# mingw Perl
Configure::Data->set(
'cp' => 'copy',
+ 'ld_load_flags' => '-shared ',
+ 'ld_share_flags' => '-shared libparrot.def ',
'make' => 'mingw32-make',
+ 'ncilib_link_extra' => 'src/libnci_test.def',
);
} else {
warn "unknown configuration";
Modified: trunk/config/init/hints/msys.pl
==============================================================================
--- trunk/config/init/hints/msys.pl (original)
+++ trunk/config/init/hints/msys.pl Wed Apr 13 01:16:36 2005
@@ -7,8 +7,9 @@
Configure::Data->set(
ld => '$(PERL) /bin/perlld',
+ ld_load_flags => '-shared ',
libs => '-lmsvcrt -lmoldname -lkernel32 -luser32 -lgdi32
-lwinspool -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid
-lws2_32 -lmpr -lwinmm -lversion -lodbc32 ',
- ncilib_link_extra => '-def:src/libnci_test.def',
+ ncilib_link_extra => 'src/libnci_test.def',
slash_exec => '\\',
);
