develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r34981 - trunk/lib/Parrot

From:
rurban
Date:
January 5, 2009 04:35
Subject:
[svn:parrot] r34981 - trunk/lib/Parrot
Message ID:
20090105123453.A68E6CB9F9@x12.develooper.com
Author: rurban
Date: Mon Jan  5 04:34:51 2009
New Revision: 34981

Modified:
   trunk/lib/Parrot/Test.pm

Log:
Fix msvc warning in t/src/compiler.t:
  LINK : warning LNK4044: Nicht erkannte Option "Lblib\lib"; ignoriert
  And we don't want to use /LIBPATH:$PConfig{blib_dir} here, only for static.



Modified: trunk/lib/Parrot/Test.pm
==============================================================================
--- trunk/lib/Parrot/Test.pm	(original)
+++ trunk/lib/Parrot/Test.pm	Mon Jan  5 04:34:51 2009
@@ -960,7 +960,9 @@
                 my $iculibs = $PConfig{has_icu} ? $PConfig{icu_shared} : q{};
                 my $libparrot =
                     $PConfig{parrot_is_shared}
-                    ? "$PConfig{rpath_blib} -L$PConfig{blib_dir} "
+                    ? ("$PConfig{rpath_blib} " .
+                      ($^O =~ m/MSWin32/ and $PConfig{cc} eq 'cl'
+                         ? "" : "-L$PConfig{blib_dir} "))
                     . (
                       $^O =~ m/MSWin32/
                     ? $PConfig{libparrot_ldflags}



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About