From: John E. Malmberg <wb8tyw@qsl.net>
Date: Tue, 24 Jul 2007 07:56:39 +0000 (-0500)
Subject: [patch@31649] vms.c realpath prototype mismatch
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5c4d031a9f33835f94f9c1d101c900979c2aca6e;p=p5sagit%2Fp5-mst-13.2.git

[patch@31649] vms.c realpath prototype mismatch
From: "John E. Malmberg" <wb8tyw@qsl.net>
Message-ID: <46A5F707.1080502@qsl.net>

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

diff --git a/vms/vms.c b/vms/vms.c
index 43a9708..27214f7 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -12160,7 +12160,8 @@ Perl_vms_start_glob
 
 #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 @@ char *realpath(const char *file_name, char * resolved_name, ...);
  * 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);
 }