Lower precedence for {-# UNPACK #-}
[ghc.git] / testsuite / tests / typecheck / should_fail / tcfail125.hs
index 664354d..e8d006b 100644 (file)
@@ -7,5 +7,5 @@ module ShouldCompile  where
 
 data (Show a) => Obs a = forall b. LiftObs a b
 
-f :: Obs a -> String   -- Needs a (Show a) context
+f :: Obs a -> String    -- Needs a (Show a) context
 f (LiftObs _ _) = "yes"