You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
49 lines
1.3 KiB
49 lines
1.3 KiB
10 years ago
|
<?xml version="1.0" encoding="UTF-8"?>
|
||
|
<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd">
|
||
|
<pkgmetadata>
|
||
|
<herd>haskell</herd>
|
||
|
<maintainer>
|
||
|
<email>haskell@gentoo.org</email>
|
||
|
</maintainer>
|
||
|
<longdescription>
|
||
|
Chell is a simple and intuitive library for automated testing. It natively
|
||
|
supports assertion-based testing, and can use companion libraries
|
||
|
such as @chell-quickcheck@ to support more complex testing strategies.
|
||
|
|
||
|
An example test suite, which verifies the behavior of artithmetic operators.
|
||
|
|
||
|
@
|
||
|
&#x7b;-\# LANGUAGE TemplateHaskell \#-&#x7d;
|
||
|
|
||
|
import Test.Chell
|
||
|
|
||
|
tests_Math :: Suite
|
||
|
tests_Math = suite \"math\"
|
||
|
&#x20; test_Addition
|
||
|
&#x20; test_Subtraction
|
||
|
|
||
|
test_Addition :: Test
|
||
|
test_Addition = assertions \"addition\" $ do
|
||
|
&#x20; $expect (equal (2 + 1) 3)
|
||
|
&#x20; $expect (equal (1 + 2) 3)
|
||
|
|
||
|
test_Subtraction :: Test
|
||
|
test_Subtraction = assertions \"subtraction\" $ do
|
||
|
&#x20; $expect (equal (2 - 1) 1)
|
||
|
&#x20; $expect (equal (1 - 2) (-1))
|
||
|
|
||
|
main :: IO ()
|
||
|
main = defaultMain [tests_Math]
|
||
|
@
|
||
|
|
||
|
@
|
||
|
$ ghc --make chell-example.hs
|
||
|
$ ./chell-example
|
||
|
PASS: 2 tests run, 2 tests passed
|
||
|
@
|
||
|
</longdescription>
|
||
|
<use>
|
||
|
<flag name="color-output">use colors in program output</flag>
|
||
|
</use>
|
||
|
</pkgmetadata>
|