Bump `base` version to 4.9.0.0 (closes #11026)
[ghc.git] / testsuite / tests / typecheck / should_fail / T5084.hs
1 module T5084 where
2
3 -- Superclass method pragma test (fail)
4 class Foo a where
5 bar :: a -> a
6 {-# INLINE bar #-}
7
8 -- Instance test (ok)
9 instance Foo Int where
10 bar = (+1)
11 {-# INLINE bar #-}
12