Add a test

tidyverse · Sep 21, 2023 · ff3fc45 · ff3fc45
1 parent 958fe85
commit ff3fc45
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/tests/testthat/test-glue.R b/tests/testthat/test-glue.R
@@ -519,6 +519,10 @@ test_that("`+` method does not interpolate twice", {
   expect_identical(glue("{x}", x = "{wut}") + "y", as_glue("{wut}y"))
 })
 
+test_that("`+` method returns length-0 for a length-0 input", {
+  expect_identical(as_glue("hello") + "world"[0], character())
+})
+
 test_that("+ method requires character vectors", {
   expect_snapshot(error = TRUE, {
     as_glue("a") + 1