ghc/compiler/ilxGen/tests/test15.hs


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


{-# OPTIONS -fglasgow-exts -fno-implicit-prelude #-}


import PrelBase
import PrelList
import PrelEnum
import PrelShow
import PrelIO


bbuild 	:: forall a. (forall b. (a -> b -> b) -> b -> b) -> [a]
{-# INLINE 2 bbuild #-}
bbuild g = g (:) []

main = putStr "hello world\n"