diff options
-rw-r--r-- | compiler/hsSyn/HsDecls.lhs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/hsSyn/HsDecls.lhs b/compiler/hsSyn/HsDecls.lhs index 273cc98c54..0312dcb197 100644 --- a/compiler/hsSyn/HsDecls.lhs +++ b/compiler/hsSyn/HsDecls.lhs @@ -942,6 +942,8 @@ instance Outputable ForeignImport where ptext (sLit "static") <+> pp_hdr <+> char '&' <> ppr lbl pprCEntity (CFunction (StaticTarget lbl)) = ptext (sLit "static") <+> pp_hdr <+> ppr lbl + pprCEntity (CFunction (PackageTarget lbl _)) = + ptext (sLit "static") <+> pp_hdr <+> ppr lbl pprCEntity (CFunction (DynamicTarget)) = ptext (sLit "dynamic") pprCEntity (CWrapper) = ptext (sLit "wrapper") |