tests/testthat/testShowCode.R

context("MasterMind - showCode")

source('../../R/server.R')

test_that("showCode numOfPicks=1", {
  showCode <- mmServer('showCode')
  expect_failure(expect_null(showCode))

})
pkristoff/MasterMind documentation built on May 25, 2019, 11:35 p.m.