From 8bf498c61f24525229f0bc50bd2d5389d434394b Mon Sep 17 00:00:00 2001 From: wlandau-lilly Date: Mon, 4 Dec 2023 11:54:06 -0500 Subject: [PATCH] Migrate through test-class_store_custom.R --- tests/testthat/test-class_patternview.R | 6 +++--- tests/testthat/test-class_stem.R | 4 ++-- tests/testthat/test-class_store_custom.R | 2 +- 3 files changed, 6 insertions(+), 6 deletions(-) diff --git a/tests/testthat/test-class_patternview.R b/tests/testthat/test-class_patternview.R index 671975f81..ad629c676 100644 --- a/tests/testthat/test-class_patternview.R +++ b/tests/testthat/test-class_patternview.R @@ -39,7 +39,7 @@ tar_test("progress of a pattern with a canceled branch", { progress <- local$scheduler$progress$database$read_data() progress <- as_data_frame(progress) progress <- progress[progress$name == "map", ] - expect_equal(progress$progress, c("started", "canceled")) + expect_equal(progress$progress, c("dispatched", "canceled")) }) tar_test("progress of a pattern with a errored branch", { @@ -61,7 +61,7 @@ tar_test("progress of a pattern with a errored branch", { progress <- local$scheduler$progress$database$read_data() progress <- as_data_frame(progress) progress <- progress[progress$name == "map", ] - expect_equal(progress$progress, c("started", "errored")) + expect_equal(progress$progress, c("dispatched", "errored")) }) tar_test("same, but continue on error", { @@ -84,7 +84,7 @@ tar_test("same, but continue on error", { progress <- local$scheduler$progress$database$read_data() progress <- as_data_frame(progress) progress <- progress[progress$name == "map", ] - expect_equal(progress$progress, c("started", "errored")) + expect_equal(progress$progress, c("dispatched", "errored")) }) tar_test("patternview_validate()", { diff --git a/tests/testthat/test-class_stem.R b/tests/testthat/test-class_stem.R index e0245a96e..ba23eb2d8 100644 --- a/tests/testthat/test-class_stem.R +++ b/tests/testthat/test-class_stem.R @@ -409,6 +409,6 @@ tar_test("bootstrap a budding and a non-budding stem for shortcut", { expect_equal(unname(tar_read(z)), c(3L, 4L)) p <- tar_progress() expect_equal(nrow(p), 3L) - expect_equal(p$progress[grepl("^z_", p$name)], rep("built", 2L)) - expect_equal(p$progress[p$name == "z"], "built") + expect_equal(p$progress[grepl("^z_", p$name)], rep("completed", 2L)) + expect_equal(p$progress[p$name == "z"], "completed") }) diff --git a/tests/testthat/test-class_store_custom.R b/tests/testthat/test-class_store_custom.R index f47c74775..5b8b234ef 100644 --- a/tests/testthat/test-class_store_custom.R +++ b/tests/testthat/test-class_store_custom.R @@ -52,7 +52,7 @@ tar_test("class_store_custom rds", { tar_target(x, "value", format = format) }) tar_make(callr_function = NULL) - expect_equal(tar_progress(x)$progress, "built") + expect_equal(tar_progress(x)$progress, "completed") expect_equal(tar_read(x), "value") })