blob: b63ea2f38ce2cf06e3bcda99ae58adf46c809fb2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
T5883.hs:(7,4)-(12,4): Splicing declarations
[d| data Unit = Unit
instance Show Unit where
show _ = ""
{-# INLINE show #-} |]
======>
data Unit = Unit
instance () => Show Unit where
{-# INLINE show #-}
show _ = ""
|