rayrender v0.38.10: Don't include testthat C++ tests on the CRAN

Author: tylermorganwall

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: rayrender
 Type: Package
 Title: Build and Raytrace 3D Scenes
-Version: 0.38.9
-Date: 2025-02-20
+Version: 0.38.10
+Date: 2025-02-24
 Authors@R: c(person("Tyler", "Morgan-Wall", email = "tylermw@gmail.com", 
     role = c("aut", "cph", "cre"), comment = c(ORCID = "0000-0002-3131-3814")),
     person("Syoyo", "Fujita", role=c("ctb", "cph")),

src/matrix.cpp

@@ -1,6 +1,5 @@
 #include "matrix.h"
 #include "simd.h"
-#include <testthat.h>
 
 static_assert(std::is_trivially_copyable<FVec4>::value,
               "FVec4 must be trivially copyable to use memcpy safely.");
@@ -175,6 +174,7 @@ Matrix4x4 Transpose(const Matrix4x4 &m) {
                    m.m[0][3], m.m[1][3], m.m[2][3], m.m[3][3]);
 }
 
+#ifdef NOT_CRAN
 #include <testthat.h>
 #include <Rcpp.h>
 
@@ -303,3 +303,5 @@ context("Inverse computes matrix inverse correctly") {
         }
     }
 }
+
+#endif

src/simd.cpp

@@ -55,6 +55,7 @@ inline IVec4 sort_simd_4_floats(FVec4 values) {
                   extract_index(values[3])));
 }
 
+#ifdef NOT_CRAN
 #include <testthat.h>
 
 context("simd_load loads values correctly") {
@@ -68,7 +69,6 @@ context("simd_load loads values correctly") {
   }
 }
 
-
 context("simd_sub subtracts vectors correctly") {
   test_that("[simd_sub]") {
     float a_values[SIMD_WIDTH] = {5.0f, 6.0f, 7.0f, 8.0f};
@@ -695,4 +695,5 @@ context("simd_set1 initializes SimdMask with unsigned int value correctly") {
       expect_true(mask_bits == value);
     }
   }
-}
+}
+#endif

src/test-runner.cpp

@@ -3,5 +3,14 @@
  * 'run_testthat_tests()' C routine that can be used to run the Catch unit tests
  * available in your package.
  */
+#ifdef NOT_CRAN
 #define TESTTHAT_TEST_RUNNER
 #include <testthat.h>
+#else 
+
+#include <R.h>
+#include <Rinternals.h>
+extern "C" SEXP run_testthat_tests(SEXP use_xml_sxp) {
+  return Rf_ScalarLogical(true);
+}
+#endif

src/transform.cpp

@@ -695,7 +695,7 @@ hit_record Transform::operator()(hit_record &r) const {
 //   return ret;
 // }
 
-
+#ifdef NOT_CRAN
 // Unit Tests
 #include <testthat.h>
 
@@ -978,3 +978,5 @@ context("Transform composition works correctly") {
       expect_true(pTransformed.z() == Approx(expectedPoint.z()));
   }
 }
+
+#endif

src/vectypes.cpp

@@ -1,11 +1,13 @@
 #include "Rcpp.h"
-#include <testthat.h>
 #include "vec3.h"
 #include "point3.h"
 #include "normal.h"
 #include "simd.h"
 #include "vectypes.h"  // Your provided header with inline functions
 
+#ifdef NOT_CRAN
+#include <testthat.h>
+
 context("Conversion functions") {
     test_that("[convert_to_point3(vec3f)]") {
         vec3f v; v.e[0] = 1.0f; v.e[1] = 2.0f; v.e[2] = 3.0f;
@@ -462,3 +464,5 @@ context("point3<Float> arithmetic operators") {
         expect_true(v.z() == Approx(1.0f));
     }
 }
+
+#endif