2013-02-12 05:06:22 +00:00
|
|
|
module ListSpec where
|
|
|
|
|
|
|
|
|
|
import Control.Applicative
|
|
|
|
|
import Expectation
|
2013-05-20 02:29:44 +00:00
|
|
|
import Language.Haskell.GhcMod
|
|
|
|
|
import Test.Hspec
|
2013-02-12 05:06:22 +00:00
|
|
|
|
|
|
|
|
spec :: Spec
|
|
|
|
|
spec = do
|
|
|
|
|
describe "listModules" $ do
|
|
|
|
|
it "lists up module names" $ do
|
|
|
|
|
modules <- lines <$> listModules defaultOptions
|
|
|
|
|
modules `shouldContain` "Data.Map"
|
