LangSpec.hs 329 B

123456789101112131415
  1. module LangSpec where
  2. import Control.Applicative
  3. import Test.Hspec
  4. import Expectation
  5. import Lang
  6. import Types
  7. spec :: Spec
  8. spec = do
  9. describe "listLanguages" $ do
  10. it "lists up language extensions" $ do
  11. exts <- lines <$> listLanguages defaultOptions
  12. exts `shouldContain` "OverloadedStrings"