testsuite/tests/th/T16195.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

{-# LANGUAGE TemplateHaskell #-}
module T16195 where

import T16195A

main2 :: IO ()
main2 = return ()

main :: IO ()
main = $$foo

main3 :: IO ()
main3 = putStrLn ($$showC $$unitC)