Change 34564 by [EMAIL PROTECTED] on 2008/10/23 21:50:53
First two hunks from 30402 adapted for 5.8.
Affected files ...
... //depot/maint-5.8/perl/vms/vms.c#37 edit
Differences ...
==== //depot/maint-5.8/perl/vms/vms.c#37 (text) ====
Index: perl/vms/vms.c
--- perl/vms/vms.c#36~34478~ 2008-10-14 05:17:11.000000000 -0700
+++ perl/vms/vms.c 2008-10-23 14:50:53.000000000 -0700
@@ -122,7 +122,6 @@
*/
#ifdef sys$getdviw
#undef sys$getdviw
-#endif
int sys$getdviw
(unsigned long efn,
unsigned short chan,
@@ -132,6 +131,7 @@
void * (astadr)(unsigned long),
void * astprm,
void * nullarg);
+#endif
#if __CRTL_VER >= 70300000 && !defined(__VAX)
End of Patch.
