X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FilxGen%2Ftests%2Ftest15.hs;fp=compiler%2FilxGen%2Ftests%2Ftest15.hs;h=3e522d757ce1d108420309c86836d78a234f6022;hb=0065d5ab628975892cea1ec7303f968c3338cbe1;hp=0000000000000000000000000000000000000000;hpb=28a464a75e14cece5db40f2765a29348273ff2d2;p=ghc-hetmet.git diff --git a/compiler/ilxGen/tests/test15.hs b/compiler/ilxGen/tests/test15.hs new file mode 100644 index 0000000..3e522d7 --- /dev/null +++ b/compiler/ilxGen/tests/test15.hs @@ -0,0 +1,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" + +