test_that("multiplication works", {
fmt <- format_num("~s")
expect_is(fmt, "JS_EVAL")
expect_error(format_num(".0f", locale = "DONT_EXIST"))
})