nocov for apparently spurious miss

MichaelChirico · web-flow · commit f15581d3118a · 2025-01-21T09:15:21.000-08:00
diff --git a/R/as.data.table.R b/R/as.data.table.R
@@ -214,7 +214,7 @@ as.data.table.list = function(x,
 }
 
 as.data.table.data.frame = function(x, keep.rownames=FALSE, key=NULL, ...) {
-  if (is.data.table(x)) return(as.data.table.data.table(x)) # S3 is weird, #6739
+  if (is.data.table(x)) return(as.data.table.data.table(x)) # S3 is weird, #6739. Also # nocov; this is tested in 2302.{2,3}, not sure why it doesn't show up in coverage.
   if (!identical(class(x), "data.frame")) return(as.data.table(as.data.frame(x)))
   if (!isFALSE(keep.rownames)) {
     # can specify col name to keep.rownames, #575; if it's the same as key,

Original file line number	Diff line number	Diff line change
`@@ -214,7 +214,7 @@ as.data.table.list = function(x,`
`214`	`214`	`}`
`215`	`215`
`216`	`216`	`as.data.table.data.frame = function(x, keep.rownames=FALSE, key=NULL, ...) {`
`217`		`- if (is.data.table(x)) return(as.data.table.data.table(x)) # S3 is weird, #6739`
	`217`	`+ if (is.data.table(x)) return(as.data.table.data.table(x)) # S3 is weird, #6739. Also # nocov; this is tested in 2302.{2,3}, not sure why it doesn't show up in coverage.`
`218`	`218`	`if (!identical(class(x), "data.frame")) return(as.data.table(as.data.frame(x)))`
`219`	`219`	`if (!isFALSE(keep.rownames)) {`
`220`	`220`	`# can specify col name to keep.rownames, #575; if it's the same as key,`