The R Project SVN R

Rev

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

Rev 50910 Rev 50915
Line 68... Line 68...
68
#else
68
#else
69
# define FOR_Rscript
69
# define FOR_Rscript
70
# include "rterm.c"
70
# include "rterm.c"
71
#endif
71
#endif
72
 
72
 
73
#define RSVERSION "$Rev: 50910 $"
73
#define RSVERSION "$Rev: 50915 $"
74
 
74
 
75
#ifdef HAVE_EXECV
75
#ifdef HAVE_EXECV
76
static int verbose = 0;
76
static int verbose = 0;
77
#endif
77
#endif
78
 
78
 
Line 220... Line 220...
220
	fprintf(stderr, "'\n\n");
220
	fprintf(stderr, "'\n\n");
221
    }
221
    }
222
#ifndef WIN32
222
#ifndef WIN32
223
    res = execv(cmd, av); /* will not return if R is launched */
223
    res = execv(cmd, av); /* will not return if R is launched */
224
    perror("Rscript execution error");
224
    perror("Rscript execution error");
225
#elif defined WIN64
-
 
226
    realmain(ac, av);
-
 
227
#else
225
#else
228
    AppMain(ac, av);
226
    AppMain(ac, av);
229
#endif
227
#endif
230
    return res;
228
    return res;
231
#else /* No execv*/
229
#else /* No execv*/