Sha256: 2154e42210056c6a62cf70ce985c5133a8bafe676be5d2a909c3013c2e37752b
Contents?: true
Size: 1.18 KB
Versions: 141
Compression:
Stored size: 1.18 KB
Contents
module Test.Main where
import Prelude
import Test.Unit.Assert as Assert
import Acronym (abbreviate)
import Control.Monad.Eff (Eff)
import Control.Monad.Eff.AVar (AVAR)
import Control.Monad.Eff.Console (CONSOLE)
import Test.Unit (TestSuite, suite, test)
import Test.Unit.Console (TESTOUTPUT)
import Test.Unit.Main (runTest)
main :: forall eff
. Eff ( avar :: AVAR
, console :: CONSOLE
, testOutput :: TESTOUTPUT
| eff
)
Unit
main = runTest suites
suites :: forall e. TestSuite e
suites = do
suite "Acronym.abbreviate" do
test "acronyms from title case" $
Assert.equal
"PNG" $
abbreviate "Portable Networks Graphic"
test "acronyms from lower case" $
Assert.equal
"ROR" $
abbreviate "Ruby on Rails"
test "acronyms from inconsistent case" $
Assert.equal
"HTML" $
abbreviate "HyperText Markup Language"
test "punctuation is ignored" $
Assert.equal
"FIFO" $
abbreviate "First in, First out"
test "acronyms ignoring punctuation and casing" $
Assert.equal
"CMOS" $
abbreviate "Complementary Metal-Oxide semiconductor"
Version data entries
141 entries across 141 versions & 1 rubygems