chuchu-0.4.1: Behaviour Driven Development like Cucumber for Haskell

Portabilitynon-portable (DeriveDataTypeable)
MaintainerMarco Túlio Pimenta Gontijo <>
Safe HaskellNone



Chuchu is a system similar to Ruby's Cucumber for Behaviour Driven Development. It works with a language similar to Cucumber's Gherkin, which is parsed using package abacate.

This module provides the main function for a test file based on Behaviour Driven Development for Haskell.

Example for a Stack calculator:


Feature: Division
  In order to avoid silly mistakes
  Cashiers must be able to calculate a fraction

Scenario: Regular numbers
    Given that I have entered 3 into the calculator
    And that I have entered 2 into the calculator
    When I press divide
    Then the result should be 1.5 on the screen


import Control.Applicative
import Control.Monad.IO.Class
import Control.Monad.Trans.State
import Test.Chuchu
import Test.HUnit

type CalculatorT m = StateT [Double] m

enterNumber :: Monad m => Double -> CalculatorT m ()
enterNumber = modify . (:)

getDisplay :: Monad m => CalculatorT m Double
  = do
    ns <- get
    return $ head $ ns ++ [0]

divide :: Monad m => CalculatorT m ()
divide = do
  (n1:n2:ns) <- get
  put $ (n2 / n1) : ns

defs :: Chuchu (CalculatorT IO)
  = do
      ("that I have entered " *> number <* " into the calculator")
    When "I press divide" $ const divide
    Then ("the result should be " *> number <* " on the screen")
      $ \n
        -> do
          d <- getDisplay
          liftIO $ d @?= n

main :: IO ()
main = chuchuMain defs (`evalStateT` [])



chuchuMain :: (MonadBaseControl IO m, MonadIO m, Applicative m) => Chuchu m -> (m () -> IO ()) -> IO ()Source

The main function for the test file. It expects one or more .feature file as parameters on the command line. If you want to use it inside a library, consider using withArgs.