about summary refs log blame commit diff
path: root/third_party/bazel/rules_haskell/tests/haddock/TH.hs
blob: 6e791b09154e8f7ed5dff684e7deed6f3b0356f9 (plain) (tree)
1
2
3
4
5
6
7






                                                           
module TH (foo) where

import Language.Haskell.TH
import Language.Haskell.TH.Syntax (lift)

foo :: Q Exp
foo = runIO (readFile "tests/haddock/unicode.txt") >>= lift