fixed test

Author: badasahog

inst/tests/tests.Rraw

@@ -21524,11 +21524,12 @@ test(2332.81, {M1[]=frev(M1); M1}, {M2[]=rev(M2); M2})
 # regression test of edge case report #4964
 test(2333, as.expression(data.table(a = 1))[["a"]], 1)
 
+# regression test for hexdigits subscript overrun (uint8_t wraps over 255, unsigned overflow is well defined in c)
 f = tempfile()
 writeLines('a', f)
 writeLines(rep('0x1.ffffp0', 10000), f)
-writeLines('0x1.ff\x9fp0', f)
+writeLines('0x1.ff\x9fp0\n', f)
 writeLines(rep('0x1.ffffp0', 20000), f)
-test(2334, fread(f))
+test(2334, fread(f), TRUE)
 
-unlink(f)
+unlink(f)