From 1de9230be1f6f342067b2d6d521d99a0224ea8e4 Mon Sep 17 00:00:00 2001
From: Nitish Jha <151559388+Nj221102@users.noreply.github.com>
Date: Thu, 11 Apr 2024 11:32:21 +0530
Subject: [PATCH] Update nafill.Rraw

---
 inst/tests/nafill.Rraw | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/inst/tests/nafill.Rraw b/inst/tests/nafill.Rraw
index 4060a943d..466eb80c1 100644
--- a/inst/tests/nafill.Rraw
+++ b/inst/tests/nafill.Rraw
@@ -156,8 +156,9 @@ test(4.27, colnamesInt(dt, c("a", NA), skip_absent=TRUE), c(1L,0L))
 test(4.28, colnamesInt(dt, c(1L, 0L), skip_absent=TRUE), error="received non-existing column*.*0")
 test(4.29, colnamesInt(dt, c(1, -5), skip_absent=TRUE), error="received non-existing column*.*-5")
 test(4.30, colnamesInt(dt, c(1, 4), skip_absent=NULL), error="skip_absent must be TRUE or FALSE")
+test(4.31, colnamesInt(dt, c(1L, 1000L), skip_absent=TRUE), c(1L,1000L))
 names(dt) <- NULL
-test(4.31, colnamesInt(dt, "a"), error="has no names")
+test(4.32, colnamesInt(dt, "a"), error="has no names")
 
 # verbose
 dt = data.table(a=c(1L, 2L, NA_integer_), b=c(1, 2, NA_real_))