tests/testthat/setup-dict.R

In translated: Simple and Robust Translation System

dict_1 <- list(
  config = list(
    locale = list(
      language = "en",
      country = "CA",
      encoding = NULL
    ),
    plural = list(
      c("n==1", "2"),
      c("n%%4==3", "3"),
      c("TRUE", "1")
    )
  ),
  translation = list(
    language = "Canadian English",
    nouns = list(
      animals = list(
        cat = "catty",
        dog = "doggie"
      )
    )
  )
)