Skip to content

Commit

Permalink
add Rf_ prefix
Browse files Browse the repository at this point in the history
  • Loading branch information
kevinushey committed Aug 12, 2024
1 parent 5540543 commit 4a5ee5a
Show file tree
Hide file tree
Showing 4 changed files with 4 additions and 4 deletions.
2 changes: 1 addition & 1 deletion tests/testthat/Test+Char/TestCompiled/src/simple.cc
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@
extern "C" SEXP simple_(SEXP x) {
double *px, *pout;

SEXP out = PROTECT(allocVector(REALSXP, 1));
SEXP out = PROTECT(Rf_allocVector(REALSXP, 1));

px = REAL(x);
pout = REAL(out);
Expand Down
2 changes: 1 addition & 1 deletion tests/testthat/TestCompiled/src/simple-header.h
Original file line number Diff line number Diff line change
Expand Up @@ -9,7 +9,7 @@ template <typename R, int R_SXP>
SEXP simple2_(SEXP x) {
R *px, *pout;

SEXP out = PROTECT(allocVector(R_SXP, 1));
SEXP out = PROTECT(Rf_allocVector(R_SXP, 1));

px = (R *) DATAPTR(x);
pout = (R *) DATAPTR(out);
Expand Down
2 changes: 1 addition & 1 deletion tests/testthat/TestCompiled/src/simple.cc
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@
extern "C" SEXP simple_(SEXP x) {
double *px, *pout;

SEXP out = PROTECT(allocVector(REALSXP, 1));
SEXP out = PROTECT(Rf_allocVector(REALSXP, 1));

px = REAL(x);
pout = REAL(out);
Expand Down
2 changes: 1 addition & 1 deletion tests/testthat/TestCompiledSubdir/src/lib/simple.c
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@
SEXP simple_(SEXP x) {
double *px, *pout;

SEXP out = PROTECT(allocVector(REALSXP, 1));
SEXP out = PROTECT(Rf_allocVector(REALSXP, 1));

px = REAL(x);
pout = REAL(out);
Expand Down

0 comments on commit 4a5ee5a

Please sign in to comment.