search for: end_r

...192.168.60.0/24 RtrA interfaces: eth0 192.168.20.100 eth1 192.168.50.1 HOSTA in LAN-A eth0 192.168.50.250 RtrB interfaces: eth0 192.168.20.98 eth1 192.168.60.1 HOSTB in LAN-B eth0 192.168.60.250 Here is the setup script on RtrB: 1 #!/bin/sh 2 3 END_L=192.168.20.98 4 END_R=192.168.20.100 5 GRE_L=10.0.0.4 6 GRE_R=10.0.0.3 7 MGROUP=224.0.55.55 8 SUBNET_R=192.168.50.0/24 9 10 /usr/sbin/iptables -F 11 /usr/sbin/iptables -F -t nat 12 /usr/sbin/iptables -P FORWARD ACCEPT 13 14 ip tunnel del gretun 15 ip tunnel add...

..."\n\r ls()")); PROTECT(e = R_ParseVector(tmp, 1, &status, R_NilValue)); if (status != PARSE_OK) { printf("boo boo\n"); } else { PrintValue(e); R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); } UNPROTECT(2); end_R(); return(0); } -- Mikhail

...arseStatus status; init_R(argc, argv); PROTECT(tmp = mkString("{print(lh)}")); PROTECT(e = R_ParseVector(tmp, 1, &status, R_NilValue)); PrintValue(e); R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); UNPROTECT(2); end_R(); } int main(int argc, char *argv[]){ pthread_t th1; int iret1; iret1 = pthread_create(&th1, NULL, ts_thread,NULL); pthread_join(th1, NULL); printf("Thread 1 return:%d\n", iret1); return 0; } ----------------------------------- 2, My os and compiler...

..._| > > > # #rectypes;; > # #require "R";; > # module X = R;; > module X : > sig > external init_r : string array -> int = "init_r" > val init : ?argv:string array -> unit -> int > external terminate : unit -> unit = "end_r" > type sexp = R.sexp > type symbol = string > type arg = [ `Anon of sexp | `Named of sexp * symbol ] > external sexp : string -> sexp = "r_sexp_of_string" > external sexp_of_symbol : symbol -> sexp = "r_sexp_of_symbol" > exte...

..._| > > > # #rectypes;; > # #require "R";; > # module X = R;; > module X : > sig > external init_r : string array -> int = "init_r" > val init : ?argv:string array -> unit -> int > external terminate : unit -> unit = "end_r" > type sexp = R.sexp > type symbol = string > type arg = [ `Anon of sexp | `Named of sexp * symbol ] > external sexp : string -> sexp = "r_sexp_of_string" > external sexp_of_symbol : symbol -> sexp = "r_sexp_of_symbol" > exte...

...atus, R_NilValue)); > if (status != PARSE_OK) > { > printf("boo boo\n"); > } > else > { > PrintValue(e); > R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); > } > UNPROTECT(2); > > end_R(); > return(0); > } > > > -- > Mikhail > > ______________________________________________ > R-devel at r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-devel

...arseStatus status; init_R(argc, argv); PROTECT(tmp = mkString("{print(lh)}")); PROTECT(e = R_ParseVector(tmp, 1, &status, R_NilValue)); PrintValue(e); R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); UNPROTECT(2); end_R(); } int main(int argc, char *argv[]){ pthread_t th1; int iret1; iret1 = pthread_create(&th1, NULL, ts_thread,NULL); pthread_join(th1, NULL); printf("Thread 1 return:%d\n", iret1); return 0; } ----------------------------------- 2, My os and compiler...

...arseStatus status; init_R(argc, argv); PROTECT(tmp = mkString("{print(lh)}")); PROTECT(e = R_ParseVector(tmp, 1, &status, R_NilValue)); PrintValue(e); R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); UNPROTECT(2); end_R(); } int main(int argc, char *argv[]){ pthread_t th1; int iret1; iret1 = pthread_create(&th1, NULL, ts_thread,NULL); pthread_join(th1, NULL); printf("Thread 1 return:%d\n", iret1); return 0; } ----------------------------------- 2, My os and compiler...

...PARSE_OK) >> { >> printf("boo boo\n"); >> } >> else >> { >> PrintValue(e); >> R_tryEval(VECTOR_ELT(e,0), R_GlobalEnv, &hadError); >> } >> UNPROTECT(2); >> >> end_R(); >> return(0); >> } -- Mikhail