This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Change 29297 omitted a semicolon.
[perl5.git] / win32 / runperl.c
1 #include "EXTERN.h"
2 #include "perl.h"
3
4 #ifdef __GNUC__
5
6 /* Mingw32 defaults to globing command line 
7  * This is inconsistent with other Win32 ports and 
8  * seems to cause trouble with passing -DXSVERSION=\"1.6\" 
9  * So we turn it off like this:
10  */
11 int _CRT_glob = 0;
12
13 #endif
14
15 int
16 main(int argc, char **argv, char **env)
17 {
18     return RunPerl(argc, argv, env);
19 }
20
21