Отладка тестов testthat в RStudio

Для меня работает следующее:

1. Вставьте вызов browser() где-нибудь в testthat модульных тестов.
2. Запустите devtools::test() из консоли RStudio (вместо использования пункта меню «Тестовый пакет» в пользовательском интерфейсе)

Затем, когда программа запуска теста выполнит вызов browser(), вы сможете использовать обозреватель среды и выполните код.

Я не нашел способа заставить testthat останавливаться в точках останова, но вставка browser() вызовов является довольно близкой заменой.

Чтобы быть абсолютно уверенным, что вы начинаете с согласованного состояния, когда дело доходит до загрузки пакетов, вы можете закрыть RStudio, снова открыть его, запустить «Очистить и перестроить», а затем devtools::test()

Наконец, если вы работаете с пакетом RStudio, вы можете ознакомиться со следующими советами из Поддержка RStudio:

Для эффективной отладки в вашем пакете вы также должны убедиться, что ваш пакет скомпилирован с параметром --with-keep.source. Этот параметр используется по умолчанию для новых пакетов в RStudio; если вам нужно установить его вручную, его можно найти в Инструменты -> Параметры проекта -> Инструменты сборки.

Если вы хотите использовать контрольные точки редактора из RStudio для отладки модульных тестов, вы можете сделать это, обойдя testthat. Как сказал Хэдли в выпуске Github, testthat обычно запускается в отдельном сеансе от RStudio, поэтому он никогда не сможет использовать точки останова редактора. Однако сами тесты представляют собой вызовы функций с двумя аргументами: описанием и кодом. Вы можете прочитать их и запустить с помощью небольшого кода.

testf_trace <- function(filename, match) {
  env <- new.env()

  test_that <- function(desc, code) {
    if (length(grep(match, desc)) > 0) {
      eval(substitute(code), env)
    }
  }
  env$test_that <- test_that
  source(filename, env)
}

Если у вас есть тест, который читает test_that("invariant is true", { f(3) == 6 }), вы можете проверить это, запустив testf_trace(filename, "is true").

Если вы не уверены, где определена функция и, следовательно, сработает ли точка останова, вы можете узнать это, набрав имя функции в консоли. Последняя строка или две сообщат вам, в какой среде определена функция, если она была определена в среде, отличной от .Global.