aboutsummaryrefslogtreecommitdiff
path: root/html-test/src
diff options
context:
space:
mode:
Diffstat (limited to 'html-test/src')
-rw-r--r--html-test/src/Bug679.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/html-test/src/Bug679.hs b/html-test/src/Bug679.hs
index dba194c4..0a321ec5 100644
--- a/html-test/src/Bug679.hs
+++ b/html-test/src/Bug679.hs
@@ -13,7 +13,7 @@ $(do
let methodN = mkName "foo"
methodTy <- [t| $(varT a) -> $(varT a) |]
- let cla = ClassD [] classN [PlainTV a] [] [SigD methodN methodTy]
+ let cla = ClassD [] classN [PlainTV a ()] [] [SigD methodN methodTy]
-- Note that we are /reusing/ the same type variable 'a' as in the class
instanceHead <- [t| $(conT classN) (Bar $(varT a)) |]