diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2012-05-24 12:29:35 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2012-05-24 12:29:35 +0100 |
| commit | 2c363f48737e50341446b47bf5d87f43f4ae971b (patch) | |
| tree | 50753bbb22d6bdf632bc0053346bf294db95cabe /testsuite/tests/th/T2713.hs | |
| parent | 677a3ab296dc220656c1cdfd8e7fb72d9f6ae8b6 (diff) | |
| download | haskell-2c363f48737e50341446b47bf5d87f43f4ae971b.tar.gz | |
Extend test for Trac #2713 (cf Trac #6120)
Diffstat (limited to 'testsuite/tests/th/T2713.hs')
| -rw-r--r-- | testsuite/tests/th/T2713.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/testsuite/tests/th/T2713.hs b/testsuite/tests/th/T2713.hs index 77eb704b1c..980d499603 100644 --- a/testsuite/tests/th/T2713.hs +++ b/testsuite/tests/th/T2713.hs @@ -4,6 +4,9 @@ module Fixity where class MyClass a where
(.*.) :: a -> a -> a
+f x = x
+
$( [d| x = undefined |] )
infixr 3 .*.
+f :: Int -> Int
|