Fixup HereDoc and Verify.

This commit is contained in:
Corey O'Connor 2011-05-19 13:03:46 -07:00
parent 88308c8dee
commit de65cb2758
2 changed files with 2 additions and 1 deletions

View File

@ -10,5 +10,5 @@ import Language.Haskell.TH.Syntax
import Language.Haskell.TH.Lib
heredoc :: QuasiQuoter
heredoc = QuasiQuoter (litE . stringL) (litP . stringL)
heredoc = QuasiQuoter (litE . stringL) (litP . stringL) undefined undefined

View File

@ -84,3 +84,4 @@ instance Arbitrary DoubleColumnChar where
instance Arbitrary Word where
arbitrary = choose (0, 1024) >>= return . toEnum