The R Project SVN R

Rev

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

Rev 6204 Rev 6206
Line 261... Line 261...
261 
	    inError = 3;
 261 
	    inError = 3;
262 
	    eval(s, c->cloenv);
 262 
	    eval(s, c->cloenv);
263 
	    inError = 1;
 263 
	    inError = 1;
264 
	}
 264 
	}
265 
    }
 265 
    }
- 
 
 266 
    else if ( !R_Interactive )
- 
 
 267 
	R_CleanUp(SA_NOSAVE);
266 
 
 268 
 
267 
    if (R_Inputfile != NULL)
 269 
    if (R_Inputfile != NULL)
268 
	fclose(R_Inputfile);
 270 
	fclose(R_Inputfile);
269 
    R_ResetConsole();
 271 
    R_ResetConsole();
270 
    R_FlushConsole();
 272 
    R_FlushConsole();