X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fprelude%2FTysWiredIn.lhs;h=598fa420321f58750bcd1ffbce5a504d3dc33ab5;hb=d78d04173296841b5949ebce640f444dcfb026f2;hp=db80d3cbf0f8ae36da106c01a8befa24c6c35ac5;hpb=80c89b80c355b2aaebcd53330e6c6170c3f05aca;p=ghc-hetmet.git

diff --git a/compiler/prelude/TysWiredIn.lhs b/compiler/prelude/TysWiredIn.lhs
index db80d3c..598fa42 100644
--- a/compiler/prelude/TysWiredIn.lhs
+++ b/compiler/prelude/TysWiredIn.lhs
@@ -232,7 +232,6 @@ pcDataConWithFixity declared_infix dc_name tyvars arg_tys tycon
 		[]	-- No equality spec
 		[]	-- No theta
 		arg_tys tycon
-		Nothing -- not a data instance
 		[]	-- No stupid theta
 		(mkDataConIds bogus_wrap_name wrk_name data_con)