More unit tests

Author: gregorgorjanc

.gitignore

@@ -10,12 +10,17 @@ README_files/
 RcppTskit/**/.quarto/
 RcppTskit/cran-comments.html
 RcppTskit/cran-comments_files/
+RcppTskit/covr/
 RcppTskit/inst/doc
+RcppTskit/src/*.gcda
+RcppTskit/src/*.gcno
 RcppTskit/src/*.dll*
 RcppTskit/src/*.o
 RcppTskit/src/*.so
 RcppTskit/src/Makevars
 RcppTskit/src/Makevars.win
+RcppTskit/src/**/*.gcda
+RcppTskit/src/**/*.gcno
 RcppTskit/src/tskit/*.o
 RcppTskit/vignettes/*.R
 RcppTskit/vignettes/*.html

RcppTskit/.Rbuildignore

@@ -13,12 +13,15 @@
 ^cran-comments\.html$
 ^cran-comments\.md$
 ^cran-comments_files$
+^covr$
 ^inst/examples/create_test\.trees\.R$
 ^inst/examples/create_test\.trees\.py$
 ^inst/examples/explore_reticulate\.R$
 ^inst/examples/explore_slendr\.R$
 ^notes_pkg_dev\.Rmd$
 ^pkg_dev_notes\.md$
+^src/.*\.gcda$
+^src/.*\.gcno$
 ^test\.trees$
 ^tests/testthat/_snaps$
 ^tools/clang-tidy\.py$

RcppTskit/tests/testthat/test_TableCollection.R

@@ -509,6 +509,14 @@ test_that("node_table_add_row wrapper expands the table collection and handles i
     m_before_raw + 3L
   )
 
+  expect_error(
+    tc$node_table_add_row(flags = -1L),
+    regexp = "flags must be a non-NA zero or positive integer scalar!"
+  )
+  expect_error(
+    tc$node_table_add_row(time = NA_real_),
+    regexp = "time must be a non-NA numeric scalar!"
+  )
   expect_error(
     tc$node_table_add_row(population = NA_integer_),
     regexp = "population must be -1L, NULL, or a non-NA integer scalar!"