From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 4 Sep 2003 16:01:26 +0000 (+0000)
Subject: Tiny perlcc tweaks.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=784a4a22985b41b1cfd2d1268406269bdfabb591;p=p5sagit%2Fp5-mst-13.2.git

Tiny perlcc tweaks.

p4raw-id: //depot/perl@21029
---

diff --git a/utils/perlcc.PL b/utils/perlcc.PL
index 339c423..361069e 100644
--- a/utils/perlcc.PL
+++ b/utils/perlcc.PL
@@ -328,7 +328,7 @@ sub cc_harness_msvc {
     $link .= " -libpath:".$_ for split /\s+/, opt(L);
     my @mods = split /-?u /, $stash;
     $link .= " ".ExtUtils::Embed::ldopts("-std", \@mods);
-    $link .= " perl57.lib kernel32.lib msvcrt.lib";
+    $link .= " perl5$Config{PERL_VERSION}.lib kernel32.lib msvcrt.lib";
     vprint 3, "running $Config{cc} $compile";
     system("$Config{cc} $compile");
     vprint 3, "running $Config{ld} $link";
@@ -529,7 +529,7 @@ sub _die {
 sub _usage_and_die {
     _die(<<EOU);
 $0: Usage:
-$0 [-o executable] [-r] [-O|-B|-c|-S] [-log log] [source[.pl] | -e oneliner]
+$0 [-o executable] [-r] [-O|-B|-c|-S] [-I /foo] [-L /foo] [-log log] [source[.pl] | -e oneliner]
 EOU
 }