The R Project SVN R

Rev

Rev 4394 | Rev 8978 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4394 Rev 6994
Line 43... Line 43...
43 
 
 43 
 
44 
int PASCAL
 44 
int PASCAL
45 
WinMain (HINSTANCE Instance, HINSTANCE PrevInstance, LPSTR CmdLine,
45 
WinMain (HINSTANCE Instance, HINSTANCE PrevInstance, LPSTR CmdLine,
46 
	 int CmdShow)
 46 
	 int CmdShow)
47 
{
 47 
{
48 
    #if (PASS_ARGS > 1) /* define argc, argv, environ */
 48 
#if (PASS_ARGS > 1) /* define argc, argv, environ */
49 
	extern int _argc;
 49 
	extern int _argc;
50 
	extern char **_argv;
 50 
	extern char **_argv;
51 
	extern char **environ;
 51 
	extern char **environ;
52 
	extern void AppMain(int argc, char **argv, char **envp);
 52 
	extern void AppMain(int argc, char **argv, char **envp);
53 
    #elif (PASS_ARGS > 0) /* only define argc and argv */
 53 
#elif (PASS_ARGS > 0) /* only define argc and argv */
54 
	extern int _argc;
 54 
	extern int _argc;
55 
	extern char **_argv;
 55 
	extern char **_argv;
56 
	extern void AppMain(int argc, char **argv);
 56 
	extern void AppMain(int argc, char **argv);
57 
    #else /* else pass zero and NULL to main */
 57 
#else /* else pass zero and NULL to main */
58 
	extern void AppMain(int argc, char **argv);
 58 
	extern void AppMain(int argc, char **argv);
59 
    #endif /* end arg declarations */
 59 
#endif /* end arg declarations */
60 
 
 60 
 
61 
        startgraphapp(Instance, PrevInstance, CmdShow);
 61 
        startgraphapp(Instance, PrevInstance, CmdShow);
62 
	/*
 62 
	/*
63 
	 *  Call the main function now.
 63 
	 *  Call the main function now.
64 
	*/
 64 
	*/
65 
    #if (PASS_ARGS > 1)		/* pass argc, argv, environ */
 65 
#if (PASS_ARGS > 1)		/* pass argc, argv, environ */
66 
	AppMain(_argc, _argv, environ);
 66 
	AppMain(_argc, _argv, environ);
67 
    #elif (PASS_ARGS > 0)	/* only pass argc and argv */
 67 
#elif (PASS_ARGS > 0)	/* only pass argc and argv */
68 
	AppMain(_argc, _argv);
 68 
	AppMain(_argc, _argv);
69 
    #else			/* pass zero and NULL */
 69 
#else			/* pass zero and NULL */
70 
	AppMain(0, NULL);
 70 
	AppMain(0, NULL);
71 
    #endif
 71 
#endif
72 
 
 72 
 
73 
	/*
 73 
	/*
74 
	 *  Call the mainloop function to handle events.
 74 
	 *  Call the mainloop function to handle events.
75 
	 */
 75 
	 */
76 
 
 76