complete tests for map function

OxfordIHTM · Apr 23, 2024 · 9ff2e0c · 9ff2e0c
1 parent e745a7a
commit 9ff2e0c
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/tests/testthat/test-icd_map.R b/tests/testthat/test-icd_map.R
@@ -8,6 +8,12 @@ testthat::test_that(
       icd_map(code = "A00"),
       expected = names(ten_map_to_one_eleven)
     )
+    expect_s3_class(icd_map(from = "icd10", code = "A00"), "tbl")
+    expect_length(nrow(icd_map(from = "icd10", code = "A00")), 1)
+    expect_named(
+      icd_map(from = "icd10", code = "A00"),
+      expected = names(ten_map_to_one_eleven)
+    )
   }
 )