tests/testthat/test-repeat.R

context("Repeat loops")

test_that("simple repeat loops", {

  f <- function() repeat { }
  expect_equal(cyclocomp(f), 2)
})

Try the cyclocomp package in your browser

Any scripts or data that you put into this service are public.

cyclocomp documentation built on Aug. 31, 2023, 1:09 a.m.