-\r
-class Foo a where\r
- foo :: a\r
- \r
-instance Foo Integer where\r
- foo = foo\r
- bar = foo\r
- \r
-main = "Not to be executed."\r
---\r
+
+class Foo a where
+ foo :: a
+
+instance Foo Integer where
+ foo = foo
+ bar = foo
+
+main = "Not to be executed."
+--
7:5-7:14: Method bar is not defined in the type class Foo.
\ No newline at end of file