make miniperl -Wwrite-strings clean

[perl5.git] / perl.h

diff --git a/perl.h b/perl.h
index e48f768..854a8c9 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -5686,7 +5686,7 @@ int flock(int fd, int op);
 #endif
 
 #ifndef EXEC_ARGV_CAST
-#define EXEC_ARGV_CAST(x) x
+#define EXEC_ARGV_CAST(x) (char **)x
 #endif
 
 #define IS_NUMBER_IN_UV                      0x01 /* number within UV range (maybe not