diff options
| author | Craig A. Berry <craigberry@mac.com> | 2005-07-24 10:31:55 -0500 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-07-24 20:52:13 +0000 |
| commit | c46ec1f410f930810c1c3e760696951bc26b1248 (patch) | |
| tree | 5cce01bf1f63ef23c441be69022e4c0088646840 /pp_ctl.c | |
| parent | 7dc8f726ffdb362768c2563d86c4aba594ce406e (diff) | |
| download | perl-c46ec1f410f930810c1c3e760696951bc26b1248.tar.gz | |
blead help for VMS
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <42E3FABB.1020900@mac.com>
Date: Sun, 24 Jul 2005 15:31:55 -0500
p4raw-id: //depot/perl@25217
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3143,7 +3143,7 @@ PP(pp_require) I32 i; #ifdef VMS char *unixname; - if ((unixname = tounixspec(name, Nullch)) != Nullch) + if ((unixname = tounixspec((char *)name, Nullch)) != Nullch) #endif { namesv = NEWSV(806, 0); @@ -3280,7 +3280,7 @@ PP(pp_require) #else # ifdef VMS char *unixdir; - if ((unixdir = tounixpath(dir, Nullch)) == Nullch) + if ((unixdir = tounixpath((char *)dir, Nullch)) == Nullch) continue; sv_setpv(namesv, unixdir); sv_catpv(namesv, unixname); |