The R Project SVN R

Rev

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

Rev 6217 Rev 6357
Line 291... Line 291...
291 
		inError=0;
 291 
		inError=0;
292 
		findcontext(CTXT_RESTART, c->cloenv, R_DollarSymbol);
 292 
		findcontext(CTXT_RESTART, c->cloenv, R_DollarSymbol);
293 
	}
 293 
	}
294 
    }
 294 
    }
295 
    if ( !R_Interactive && !haveHandler && inError )
 295 
    if ( !R_Interactive && !haveHandler && inError )
296 
	R_CleanUp(SA_NOSAVE);
 296 
	R_CleanUp(SA_NOSAVE, 1, 0); /* quit, no save, no .Last, status=1 */
297 
 
 297 
 
298 
    if (R_Sinkfile) R_Outputfile = R_Sinkfile;
 298 
    if (R_Sinkfile) R_Outputfile = R_Sinkfile;
299 
    else R_Outputfile = R_Consolefile;
 299 
    else R_Outputfile = R_Consolefile;
300 
    PROTECT(s = allocList(nback));
 300 
    PROTECT(s = allocList(nback));
301 
    t = s;
 301 
    t = s;