diff options
Diffstat (limited to 'compiler/GHC/ThToHs.hs')
| -rw-r--r-- | compiler/GHC/ThToHs.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/ThToHs.hs b/compiler/GHC/ThToHs.hs index a839822e40..401f8c8a1d 100644 --- a/compiler/GHC/ThToHs.hs +++ b/compiler/GHC/ThToHs.hs @@ -381,7 +381,7 @@ cvtDec (DataInstD ctxt bndrs tys ksig constrs derivs) , dd_cons = cons', dd_derivs = derivs' } ; returnJustLA $ InstD noExtField $ DataFamInstD - { dfid_ext = noAnn + { dfid_ext = noExtField , dfid_inst = DataFamInstDecl { dfid_eqn = FamEqn { feqn_ext = noAnn , feqn_tycon = tc' @@ -401,7 +401,7 @@ cvtDec (NewtypeInstD ctxt bndrs tys ksig constr derivs) , dd_kindSig = ksig' , dd_cons = [con'], dd_derivs = derivs' } ; returnJustLA $ InstD noExtField $ DataFamInstD - { dfid_ext = noAnn + { dfid_ext = noExtField , dfid_inst = DataFamInstDecl { dfid_eqn = FamEqn { feqn_ext = noAnn , feqn_tycon = tc' |