The R Project SVN R

(root)/branches/R-classInheritance/tests/Embedding/Rerror.c @ 63243 – Rev 19500 → 29297



 
int
main(int argc, char *argv[])
{
  SEXP fun, e, arg;
 
  int errorOccurred;
  char *localArgs[] = {"R", "--gui=none", "--silent"};
  init_R(sizeof(localArgs)/sizeof(localArgs[0]), localArgs);
 
  /*

Rev 19500	Rev 29297
Line 14...	Line 14...
14		14
15	`int`	15	`int`
16	`main(int argc, char *argv[])`	16	`main(int argc, char *argv[])`
17	`{`	17	`{`
18	`SEXP fun, e, arg;`	18	`SEXP fun, e, arg;`
19	`int i;`	-
20	`int errorOccurred;`	19	`int errorOccurred;`
21	`char *localArgs[] = {"R", "--gui=none", "--silent"};`	20	`char *localArgs[] = {"R", "--gui=none", "--silent"};`
22	`init_R(sizeof(localArgs)/sizeof(localArgs[0]), localArgs);`	21	`init_R(sizeof(localArgs)/sizeof(localArgs[0]), localArgs);`
23		22
24	`/*`	23	`/*`