# this (nonstandard) test checks output against a file # thus allowing an easy preview of expected output # AND some level of standard / consistency / expectation # nolint start: commented_code_linter # # regenerate test printing file with the following # writeLines( # connectapi:::generate_R6_print_output(), # rprojroot::find_testthat_root_file("test-print-output.txt") # ) # # nolint end test_that("output matches previous expectation", { expect_snapshot(generate_R6_print_output()) })