BugTrack-R備忘録/34の変更点
+*print関数 + SEXP eval_fun02(SEXP a, SEXP rho) + { + SEXP call; + SEXP ret; + PROTECT(call = lang2(install("print"), a)); + eval(call, rho); + UNPROTECT(1); + return R_NilValue; + } +
+*print関数 + SEXP eval_fun02(SEXP a, SEXP rho) + { + SEXP call; + SEXP ret; + PROTECT(call = lang2(install("print"), a)); + eval(call, rho); + UNPROTECT(1); + return R_NilValue; + } +