The R Project SVN R

Rev

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

Rev 29297 Rev 34062
Line 15... Line 15...
15 
int
 15 
int
16 
main(int argc, char *argv[])
 16 
main(int argc, char *argv[])
17 
{
 17 
{
18 
    SEXP fun, arg;
 18 
    SEXP fun, arg;
19 
    SEXP e, e1;
 19 
    SEXP e, e1;
20 
    /* char *localArgs[] = {"R", "--gui=none", "--no-save", "--silent"}; */
 20 
    /* char *localArgs[] = {"R", "--no-save", "--silent"}; */
21 
    init_R(argc, argv);
 21 
    init_R(argc, argv);
22 
 
 22 
 
23 
      /* postscript() */
 23 
      /* postscript() */
24 
    PROTECT(fun = Rf_findFun(Rf_install("postscript"),  R_GlobalEnv));
24 
    PROTECT(fun = Rf_findFun(Rf_install("postscript"),  R_GlobalEnv));
25 
    PROTECT(e = allocVector(LANGSXP, 1));
 25 
    PROTECT(e = allocVector(LANGSXP, 1));