rename optimization parameter

Author: ben-schwen

R/test.data.table.R

@@ -361,11 +361,11 @@ gc_mem = function() {
   # nocov end
 }
 
-test = function(num,x,y=TRUE,error=NULL,warning=NULL,message=NULL,output=NULL,notOutput=NULL,ignore.warning=NULL,options=NULL,env=NULL,optimization=NULL) {
+test = function(num,x,y=TRUE,error=NULL,warning=NULL,message=NULL,output=NULL,notOutput=NULL,ignore.warning=NULL,options=NULL,env=NULL,optimize=NULL) {
   # if optimization is provided, test across multiple optimization levels
   if (!is.null(optimization)) {
     cl = match.call()
-    cl$optimization = NULL  # Remove optimization levels from the recursive call
+    cl$optimize= NULL  # Remove optimization levels from the recursive call
 
     # Check if y was explicitly provided (not just the default)
     y_provided = !missing(y)

inst/tests/benchmark.Rraw

@@ -193,10 +193,10 @@ test(301.1, nrow(DT[,sum(B),by=C])==100010)
 set.seed(1)
 DT = data.table(a=sample(1:100, 1e6, replace=TRUE), b=sample(1:1000, 1e6, replace=TRUE), key="a")
 opt = c(0L,2L)
-test(637.1, optimization=opt, copy(DT)[, m:=sum(b), by=a][1:3], data.table(a=1L, b=c(156L, 808L, 848L), m=DT[J(1), sum(b)], key="a"))
-test(637.2, optimization=opt, key(copy(DT)[J(43L), a:=99L]), NULL)
+test(637.1, optimize=opt, copy(DT)[, m:=sum(b), by=a][1:3], data.table(a=1L, b=c(156L, 808L, 848L), m=DT[J(1), sum(b)], key="a"))
+test(637.2, optimize=opt, key(copy(DT)[J(43L), a:=99L]), NULL)
 setkey(DT, a)
-test(637.3, optimization=opt, key(copy(DT)[, a:=99L, by=a]), NULL)
+test(637.3, optimize=opt, key(copy(DT)[, a:=99L, by=a]), NULL)
 
 # Test X[Y] slowdown, #2216
 # Many minutes in 1.8.2!  Now well under 1s, but 10s for very wide tolerance for CRAN. We'd like CRAN to tell us if any changes