cdeps-0.1.3.0: test/Spec.hs

{-# LANGUAGE OverloadedStrings #-}

import           Language.C.Dependency
import           Test.Hspec

main :: IO ()
main = hspec $ parallel $
    describe "byteStringIncludes" $ do
        it "should work (1/3)" $
            getIncludes "#include \"header.h\"" `shouldBe` Right ["header.h"]
        it "should work (2/3)" $
            getIncludes "#include \\\n\"gmp.cats\"" `shouldBe` Right ["gmp.cats"]
        it "should work (3/3)" $
            getIncludes "/* block comment /* */\n#include \\\n\"gmp.cats\"" `shouldBe` Right ["gmp.cats"]