diff options
Diffstat (limited to 'testsuite/tests/typecheck/should_run/tcrun011.hs')
-rw-r--r-- | testsuite/tests/typecheck/should_run/tcrun011.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/testsuite/tests/typecheck/should_run/tcrun011.hs b/testsuite/tests/typecheck/should_run/tcrun011.hs index 5c6cab8ea0..ead5827568 100644 --- a/testsuite/tests/typecheck/should_run/tcrun011.hs +++ b/testsuite/tests/typecheck/should_run/tcrun011.hs @@ -8,7 +8,7 @@ module Main (main) where class MyClass a b where - foo :: a -> b -> Int + foo :: a -> b -> Int data Special = forall b. (MyClass Int b)=> MkSpecial b data General a = forall b. (MyClass a b)=> MkGeneral b @@ -21,5 +21,5 @@ xs :: [General Int] xs = [MkGeneral True, MkGeneral False] main = print [foo (3::Int) x | MkGeneral x <- xs] - -- Without the (::Int) part we get an - -- incomprehensible error message :-( + -- Without the (::Int) part we get an + -- incomprehensible error message :-( |