This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/uni/method.t: Generalize for non-ASCII platforms
[perl5.git] / perliol.h
index 9852026..87b1fc7 100644 (file)
--- a/perliol.h
+++ b/perliol.h
@@ -109,11 +109,7 @@ struct _PerlIO {
 /* Data exports - EXTCONST rather than extern is needed for Cygwin */
 #undef EXTPERLIO 
 #ifdef PERLIO_FUNCS_CONST
-#ifdef __VMS
-#  define EXTPERLIO extern const
-#else
-#  define EXTPERLIO EXTCONST
-#endif
+#define EXTPERLIO EXTCONST
 #else
 #define EXTPERLIO EXT
 #endif