1 измењених фајлова са 3 додато и 3 уклоњено
+ 3
- 3
tests/testthat/test-regex.R
Прегледај датотеку
| text <- "ab ab" | text <- "ab ab" | ||||
| pattern <- "(a)(b)" | pattern <- "(a)(b)" | ||||
| m <- regex(text, pattern, global = TRUE) | m <- regex(text, pattern, global = TRUE) | ||||
| expect_is(m[[1]]$idx$start, "integer") | |||||
| expect_is(m[[1]]$idx$end, "integer") | |||||
| expect_is(m[[1]]$idx$group, "integer") | |||||
| expect_type(m[[1]]$idx$start, "integer") | |||||
| expect_type(m[[1]]$idx$end, "integer") | |||||
| expect_type(m[[1]]$idx$group, "integer") | |||||
| }) | }) | ||||
| test_that("length-zero match is NULL", { | test_that("length-zero match is NULL", { |
Loading…