This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[win32] add file: to installhtml URLs
[perl5.git] / win32 / runperl.c
index ff0a571..9544607 100644 (file)
@@ -1,8 +1,20 @@
 /* Say NO to CPP! Hallelujah! */
 #ifdef __GNUC__
+/*
+ * GNU C does not do __declspec()
+ */
 #define __declspec(foo) 
+
+/* Mingw32 defaults to globing command line 
+ * This is inconsistent with other Win32 ports and 
+ * seems to cause trouble with passing -DXSVERSION=\"1.6\" 
+ * So we turn it off like this:
+ */
+int _CRT_glob = 0;
+
 #endif
 
+
 __declspec(dllimport) int RunPerl(int argc, char **argv, char **env, void *ios);
 
 int