tests/testthat/test-tbb.R

test_that("TBB is enabled", {
    
  info <- info_tbb()
  if (info$enabled) {
    expect_true(info$enabled)
    expect_true(info$max_threads > 1)
  } else {
    expect_false(info$enabled)
    expect_false(info$max_threads > 1)
  }
  
})

Try the quanteda package in your browser

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

quanteda documentation built on May 29, 2024, 10 a.m.