Testsuite: delete Windows line endings [skip ci] (#11631)
[ghc.git] / testsuite / tests / th / T3395.hs
1 {-# LANGUAGE TemplateHaskell #-}
2 module T3395 where
3
4 import Language.Haskell.TH
5
6 foo = $(return $
7 CompE
8 [NoBindS (VarE $ mkName "undefined")
9 ,BindS (VarP $ mkName "r1") (VarE $ mkName "undefined") ])