Monadify iface/BuildTyCl: use return
authorTwan van Laarhoven <twanvl@gmail.com>
Thu, 17 Jan 2008 21:50:36 +0000 (21:50 +0000)
committerTwan van Laarhoven <twanvl@gmail.com>
Thu, 17 Jan 2008 21:50:36 +0000 (21:50 +0000)
compiler/iface/BuildTyCl.lhs

index 534bc5f..66cb645 100644 (file)
@@ -210,7 +210,7 @@ buildDataCon src_name declared_infix arg_stricts field_lbls
                                     stupid_ctxt dc_ids
                dc_ids = mkDataConIds wrap_name work_name data_con
 
                                     stupid_ctxt dc_ids
                dc_ids = mkDataConIds wrap_name work_name data_con
 
-       ; returnM data_con }
+       ; return data_con }
 
 
 -- The stupid context for a data constructor should be limited to
 
 
 -- The stupid context for a data constructor should be limited to