add nocov for region that only hits on non UTF8 systems

ben-schwen · ben-schwen · commit fa5967f054ed · 2025-10-25T22:35:06.000+02:00
diff --git a/R/test.data.table.R b/R/test.data.table.R
@@ -381,12 +381,14 @@ test = function(num,x,y=TRUE,error=NULL,warning=NULL,message=NULL,output=NULL,no
   if (!isFALSE(requires_utf8)) {
     test_str = if (isTRUE(requires_utf8)) "\u00F1\u00FC\u3093" else requires_utf8
     if (!utf8_check(test_str)) {
+      # nocov start
       last_utf8_skip = get0("last_utf8_skip", parent.frame(), ifnotfound=0, inherits=TRUE)
       if (num - last_utf8_skip >= 1) {
         catf("Test %s skipped because required UTF-8 symbols cannot be represented in native encoding.\n", num)
       }
       assign("last_utf8_skip", num, parent.frame(), inherits=TRUE)
       return(invisible(TRUE))
+      # nocov end
     }
   }
   # Usage:

Original file line number	Diff line number	Diff line change
`@@ -381,12 +381,14 @@ test = function(num,x,y=TRUE,error=NULL,warning=NULL,message=NULL,output=NULL,no`
`381`	`381`	`if (!isFALSE(requires_utf8)) {`
`382`	`382`	`test_str = if (isTRUE(requires_utf8)) "\u00F1\u00FC\u3093" else requires_utf8`
`383`	`383`	`if (!utf8_check(test_str)) {`
	`384`	`+ # nocov start`
`384`	`385`	`last_utf8_skip = get0("last_utf8_skip", parent.frame(), ifnotfound=0, inherits=TRUE)`
`385`	`386`	`if (num - last_utf8_skip >= 1) {`
`386`	`387`	`catf("Test %s skipped because required UTF-8 symbols cannot be represented in native encoding.\n", num)`
`387`	`388`	`}`
`388`	`389`	`assign("last_utf8_skip", num, parent.frame(), inherits=TRUE)`
`389`	`390`	`return(invisible(TRUE))`
	`391`	`+ # nocov end`
`390`	`392`	`}`
`391`	`393`	`}`
`392`	`394`	`# Usage:`