blob: ef4453138d659c5c0953c5f6f89649108b759582 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
#include "EXTERN.h"
#include "perl.h"
#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);
int
main(int argc, char **argv, char **env)
{
return RunPerl(argc, argv, env);
}
|