diff options
Diffstat (limited to 'testsuite/tests/rename/should_compile/rn036.hs')
-rw-r--r-- | testsuite/tests/rename/should_compile/rn036.hs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/tests/rename/should_compile/rn036.hs b/testsuite/tests/rename/should_compile/rn036.hs new file mode 100644 index 0000000000..9eb96b1dd6 --- /dev/null +++ b/testsuite/tests/rename/should_compile/rn036.hs @@ -0,0 +1,14 @@ +-- !!! Checking that qualified method names are legal in instance body. +-- but not (now -- Aug 02) in the binding position +module ShouldCompile where + +import Prelude hiding (Eq, (==)) +import Prelude as P (Eq,(==)) + +data Foo = Foo Int Integer + +instance P.Eq Foo where + (Foo a1 b1) == (Foo a2 b2) = a1 P.== a2 && b1 P.== b2 + + + |