compiler/ilxGen/tests/test15.hs

   1
   2 {-# OPTIONS -fglasgow-exts -fno-implicit-prelude #-}
   3
   4
   5 import PrelBase
   6 import PrelList
   7 import PrelEnum
   8 import PrelShow
   9 import PrelIO
  10
  11
  12 bbuild  :: forall a. (forall b. (a -> b -> b) -> b -> b) -> [a]
  13 {-# INLINE 2 bbuild #-}
  14 bbuild g = g (:) []
  15
  16 main = putStr "hello world\n"
  17
  18