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);
 }

Reply via email to