The R Project SVN R

Rev

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

Rev 42704 Rev 43328
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;
 - 
 
33 
	PROTECTED int    app_initialised = 0;
 32 
	PROTECTED int    app_initialised = 0;
34 
	PROTECTED HANDLE this_instance = NULL;
 33 
	PROTECTED HANDLE this_instance = NULL;
35 
	PROTECTED HANDLE prev_instance = NULL;
 34 
	PROTECTED HANDLE prev_instance = NULL;
36 
 
 35 
 
37 
/*
 36 
/*
Line 49... Line 48...
49 
 */
 48 
 */
50 
int initapp(int argc, char **argv)
 49 
int initapp(int argc, char **argv)
51 
{
 50 
{
52 
	if (! app_initialised)
 51 
	if (! app_initialised)
53 
	{
 52 
	{
54 
	        OSVERSIONINFO verinfo;
 - 
 
55 
		app_initialised = 1;
 53 
		app_initialised = 1;
56 
		verinfo.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
 - 
 
57 
		GetVersionEx(&verinfo);
 - 
 
58 
		switch(verinfo.dwPlatformId) {
 - 
 
59 
		case VER_PLATFORM_WIN32_NT:
 - 
 
60 
		    is_NT = 1;
 - 
 
61 
		    break;
 - 
 
62 
		default:
 - 
 
63 
		    is_NT = 0;
 - 
 
64 
		}
 - 
 
65 
		init_objects();
 54 
		init_objects();
66 
		init_events();
 55 
		init_events();
67 
		init_fonts();
 56 
		init_fonts();
68 
		init_cursors();
 57 
		init_cursors();
69 
		init_contexts();
 58 
		init_contexts();