tests/testthat/test-step.R

In cucumber: Behavior-Driven Development for R

describe("make_step", {
  it("should assert that step implementation has a context argument", {
    # Arrange
    implementation <- function() {

    }

    # Act, Assert
    expect_error(
      make_step("Given")("the Maker has the word {string}", implementation),
      regexp = "context",
      fixed = TRUE
    )
  })
})