pirofti/ccubes-cl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove leftover PROTECT().

Browse source
This commit is contained in:
Paul Irofti 2025-03-29 14:22:27 +02:00
parent 5b28e63318
commit 25f3371635
1 changed files with 0 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/CCubes.c
View file

@ -39,7 +39,6 @@ SEXP CCubes(SEXP tt) {
SET_STRING_ELT(names, 1, mkChar("package")); SET_STRING_ELT(names, 1, mkChar("package"));
Rf_setAttrib(args, R_NamesSymbol, names); Rf_setAttrib(args, R_NamesSymbol, names);
SEXP r_call = PROTECT();
SEXP r_result = PROTECT(R_tryEval( SEXP r_result = PROTECT(R_tryEval(
Rf_lang3(install("do.call"), mkString("system.file"), args), Rf_lang3(install("do.call"), mkString("system.file"), args),
R_GlobalEnv, R_GlobalEnv,