blob: 512f152cf14a5ebe0a1a49bdf75ce38c6973050e (
plain)
1
2
3
4
5
6
7
8
9
|
module T17409 where
-- The bug was that id was inlined only after the
-- "gentle" simplifier pass, beucause CSE in GHC.Base
-- had commoned-up 'id' with 'breakpoint', and added
-- a NOINLINE[2] to the former.
-- The test just checks that id is inlined early.
f x = not (id x)
|
