Nothing
test_that("set_state_inspector() verifies its inputs", {
expect_snapshot(set_state_inspector(function(x) 123), error = TRUE)
})
test_that("can detect state changes", {
local_options(x = NULL)
set_state_inspector(function() list(x = getOption("x")))
withr::defer(set_state_inspector(NULL))
expect_snapshot_reporter(CheckReporter$new(), test_path("reporters/state-change.R"))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.