blob: 4c64d4a3589c8fa1fa6e276e724ca32312614d8a (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
T15550.hs:(4,2)-(8,7): Splicing declarations
[d| {-# RULES "myId" forall x. myId x = x #-}
myId :: a -> a
myId x = x
{-# NOINLINE [1] myId #-} |]
======>
myId :: a -> a
myId x = x
{-# NOINLINE [1] myId #-}
{-# RULES "myId" forall x. myId x = x #-}
|