The R Project SVN R

Rev

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

Rev 33359 Rev 33370
Line 276... Line 276...
276
    /* start up the window, more initializing in here */
276
    /* start up the window, more initializing in here */
277
    if (initwin())
277
    if (initwin())
278
	errorcall(call, G_("invalid device"));
278
	errorcall(call, G_("invalid device"));
279
 
279
 
280
    /* set up a context which will close the window if there is an error */
280
    /* set up a context which will close the window if there is an error */
281
    begincontext(&cntxt, CTXT_CCODE, R_NilValue, R_NilValue, R_NilValue,
281
    begincontext(&cntxt, CTXT_CCODE, R_NilValue, R_BaseEnv, R_BaseEnv,
282
		 R_NilValue, R_NilValue);
282
		 R_NilValue, R_NilValue);
283
    cntxt.cend = &de_closewin_cend;
283
    cntxt.cend = &de_closewin_cend;
284
    cntxt.cenddata = NULL;
284
    cntxt.cenddata = NULL;
285
 
285
 
286
    highlightrect();
286
    highlightrect();