don't include callr overhead in timing

ramonssouza · May 21, 2020 · e727b20 · e727b20
1 parent 68968a5
commit e727b20
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/tests/ml/nvblas.R b/tests/ml/nvblas.R
@@ -1,10 +1,12 @@
 install.packages("callr")
 
-system.time(
+
 callr::r(function(){
+  system.time({
   N <- 2^14
   M <- matrix(rnorm(N*N), nrow=N, ncol=N)
   M %*% M
+  })  
   }, env = c(LD_PRELOAD="libnvblas.so"))
 )