testsuite/tests/ghci/scripts/T16804b.hs


1
2
3
4
5
6
7
8
9
10
11

module T16804b where

import T16804a

printStuff :: IO ()
printStuff = do
  print (testFunction A A)
  print (testFunction2 True)
  print (testFunction2 False)
  print niceValue
  print niceValue2