1 files changed, 5 insertions, 1 deletions
diff --git a/perliol.h b/perliol.h
index 87b1fc77fa..9852026475 100644
--- a/perliol.h
+++ b/perliol.h
@@ -109,7 +109,11 @@ struct _PerlIO {
 /* Data exports - EXTCONST rather than extern is needed for Cygwin */
 #undef EXTPERLIO 
 #ifdef PERLIO_FUNCS_CONST
-#define EXTPERLIO EXTCONST
+#ifdef __VMS
+#  define EXTPERLIO extern const
+#else
+#  define EXTPERLIO EXTCONST
+#endif
 #else
 #define EXTPERLIO EXT
 #endif