Tweaks and typos in manual, note refs, comments
[ghc.git] / testsuite / tests / typecheck / should_fail / tcfail149.hs
index 2479ed7..fabf6bf 100644 (file)
@@ -1,12 +1,14 @@
+{-# LANGUAGE ConstrainedClassMethods #-}
+
 module Main where
 
 class C a where
   op :: (Show a, Show b) => a -> b -> String
-       -- This class op adds a constraint on 'a'
+        -- This class op adds a constraint on 'a'
 
-       -- In GHC 7.0 this is fine, and it's a royal 
-       -- pain to reject it when in H98 mode, so
-       -- I'm just allowing it
+        -- In GHC 7.0 this is fine, and it's a royal
+        -- pain to reject it when in H98 mode, so
+        -- I'm just allowing it
 
 instance C Int where
   op x y = show x ++ " " ++ show y