diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2014-09-24 23:47:00 +0200 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2014-09-24 23:47:00 +0200 |
| commit | fb848179c85dca388edd6d92ef5cd7cd0520b4c8 (patch) | |
| tree | d3b042338b730ad28f9ce49d2cbe9242d896c381 /compiler/iface | |
| parent | 805ee118b823f271dfd8036d35b15eb3454a95ad (diff) | |
| download | haskell-fb848179c85dca388edd6d92ef5cd7cd0520b4c8.tar.gz | |
`M-x delete-trailing-whitespace` & `M-x untabify`
Diffstat (limited to 'compiler/iface')
| -rw-r--r-- | compiler/iface/TcIface.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/iface/TcIface.lhs b/compiler/iface/TcIface.lhs index 293e8c9c4c..bb5186931d 100644 --- a/compiler/iface/TcIface.lhs +++ b/compiler/iface/TcIface.lhs @@ -650,7 +650,7 @@ tcIfaceDataCons tycon_name tycon tc_tyvars if_cons ifConOcc = occ, ifConCtxt = ctxt, ifConEqSpec = spec, ifConArgTys = args, ifConFields = field_lbls, ifConStricts = if_stricts}) - = -- Universally-quantified tyvars are shared with + = -- Universally-quantified tyvars are shared with -- parent TyCon, and are alrady in scope bindIfaceTyVars ex_tvs $ \ ex_tyvars -> do { traceIf (text "Start interface-file tc_con_decl" <+> ppr occ) |