This patch corrects a prototype mismatch in vms.c, in the
mp_do_vms_realpath() routine.
It is needed to build symbolic link support into Perl on VMS 8.3
-John
[EMAIL PROTECTED]
Personal Opinion Only
--- /rsync_root/perl/vms/vms.c Sun Jun 24 10:47:36 2007
+++ vms/vms.c Mon Jul 23 00:49:30 2007
@@ -12160,7 +12160,8 @@
#ifdef HAS_SYMLINK
static char *
-mp_do_vms_realpath(pTHX_ const char *filespec, char * rslt_spec, const int
*utf8_fl);
+mp_do_vms_realpath(pTHX_ const char *filespec, char * rslt_spec,
+ const int *utf8_fl);
void
vms_realpath_fromperl(pTHX_ CV *cv)
@@ -12273,7 +12274,8 @@
* on OpenVMS.
*/
static char *
-mp_do_vms_realpath(pTHX_ const char *filespec, char *outbuf, int *utf8_fl)
+mp_do_vms_realpath(pTHX_ const char *filespec, char *outbuf,
+ const int *utf8_fl)
{
return realpath(filespec, outbuf);
}