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
... / ...
CommitLineData
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 */
11int _CRT_glob = 0;
12
13#endif
14
15int
16main(int argc, char **argv, char **env)
17{
18 return RunPerl(argc, argv, env);
19}
20
21