checking RHS of :=

venom1204 · venom1204 · commit dbb77942ecaf · 2025-01-20T23:55:03.000+05:30
diff --git a/R/data.table.R b/R/data.table.R
@@ -316,6 +316,9 @@ replace_dot_alias = function(e) {
         warningf("nomatch isn't relevant together with :=, ignoring nomatch")
         nomatch=NULL
       }
+      if (length(jsub) >= 3L && is.function(jsub[[3L]])) {
+        stopf("the right hand side of := should be a vector, list, data.frame, function or call, not a function,to store a function wrap it in a list: DT[, newcol := list(myfun)]")
+      }
     }
   }
 

Original file line number	Diff line number	Diff line change
`@@ -316,6 +316,9 @@ replace_dot_alias = function(e) {`
`316`	`316`	`warningf("nomatch isn't relevant together with :=, ignoring nomatch")`
`317`	`317`	`nomatch=NULL`
`318`	`318`	`}`
	`319`	`+ if (length(jsub) >= 3L && is.function(jsub[[3L]])) {`
	`320`	`+ stopf("the right hand side of := should be a vector, list, data.frame, function or call, not a function,to store a function wrap it in a list: DT[, newcol := list(myfun)]")`
	`321`	`+ }`
`319`	`322`	`}`
`320`	`323`	`}`
`321`	`324`