################################################################################

context("test-message")

################################################################################

test_that("printf works", {
  expect_identical(capture.output(printf("My name is %s.", "Florian")),
                   "My name is Florian.")
})

################################################################################