The R Project SVN R

Rev

Rev 9184 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9184 Rev 36921
Line 27... Line 27...
27 
/*
 27 
/*
28 
 *  Windows implementation globals.
 28 
 *  Windows implementation globals.
29 
 */
 29 
 */
30 
 
 30 
 
31 
	PROTECTED char * app_name = "GraphApp";
 31 
	PROTECTED char * app_name = "GraphApp";
- 
 
 32 
	PROTECTED int    is_NT = 0;
32 
	PROTECTED int    app_initialised = 0;
 33 
	PROTECTED int    app_initialised = 0;
33 
	PROTECTED HANDLE this_instance = 0;
 34 
	PROTECTED HANDLE this_instance = 0;
34 
	PROTECTED HANDLE prev_instance = 0;
 35 
	PROTECTED HANDLE prev_instance = 0;
35 
	PROTECTED int    cmd_show = 1;
 36 
	PROTECTED int    cmd_show = 1;
36 
 
 37 
 
Line 49... Line 50...
49 
 */
 50 
 */
50 
int initapp(int argc, char **argv)
 51 
int initapp(int argc, char **argv)
51 
{
 52 
{
52 
	if (! app_initialised)
 53 
	if (! app_initialised)
53 
	{
 54 
	{
- 
 
 55 
	        OSVERSIONINFO verinfo;
54 
		app_initialised = 1;
 56 
		app_initialised = 1;
- 
 
 57 
		verinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
- 
 
 58 
		GetVersionEx(&verinfo);
- 
 
 59 
		switch(verinfo.dwPlatformId) {
- 
 
 60 
		case VER_PLATFORM_WIN32_NT:
- 
 
 61 
		    is_NT = 1;
- 
 
 62 
		    break;
- 
 
 63 
		default:
- 
 
 64 
		    is_NT = 0;
55 
 
 65 
		}
56 
		init_objects();
 66 
		init_objects();
57 
		init_events();
 67 
		init_events();
58 
		init_fonts();
 68 
		init_fonts();
59 
		init_cursors();
 69 
		init_cursors();
60 
		init_contexts();
 70 
		init_contexts();