This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add comments about how backrefs are parsed
[perl5.git] / win32 / runperl.c
CommitLineData
76e3520e
GS
1#include "EXTERN.h"
2#include "perl.h"
3
a835ef8a 4#ifdef __GNUC__
5b0d9cbe
NIS
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\"
ed2eab3f
SH
9 * So we turn it off like this, but only when compiling
10 * perlmain.c: perlmainst.c is linked into the same executable
11 * as win32.c, which also does this, so we mustn't do it twice
12 * otherwise we get a multiple definition error.
5b0d9cbe 13 */
ed2eab3f 14#ifndef PERLDLL
5b0d9cbe 15int _CRT_glob = 0;
ed2eab3f 16#endif
5b0d9cbe 17
a835ef8a 18#endif
0a753a76 19
137443ea 20int
0a753a76
PP
21main(int argc, char **argv, char **env)
22{
0cb96387 23 return RunPerl(argc, argv, env);
0a753a76 24}
76e3520e 25
0cb96387 26