The R Project SVN R

Rev

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

Rev 38839 Rev 38849
Line 30... Line 30...
30 
    R_tryEval(e, R_GlobalEnv, &errorOccurred);
 30 
    R_tryEval(e, R_GlobalEnv, &errorOccurred);
31 
    fprintf(stderr, "Trying again (yes it will fail also!)\n");fflush(stderr);
 31 
    fprintf(stderr, "Trying again (yes it will fail also!)\n");fflush(stderr);
32 
    R_tryEval(e, R_GlobalEnv, &errorOccurred);
 32 
    R_tryEval(e, R_GlobalEnv, &errorOccurred);
33 
    UNPROTECT(1);
 33 
    UNPROTECT(1);
34 
 
 34 
 
35 
    R_CleanUp(SA_NOSAVE, 0, FALSE);
 35 
    end_R();
36 
 
 36 
 
37 
    return(0);
 37 
    return(0);
38 
}
 38 
}