- = sep [ptext SLIT("Interface file") <+> iface_file,
- ptext SLIT("contains module") <+> quotes (ppr (mi_module iface)) <> comma,
- ptext SLIT("but we were expecting module") <+> quotes (ppr mod_name),
- sep [ptext SLIT("Probable cause: the source code which generated"),
+ = sep [ptext (sLit "Interface file") <+> iface_file,
+ ptext (sLit "contains module") <+> quotes (ppr (mi_module iface)) <> comma,
+ ptext (sLit "but we were expecting module") <+> quotes (ppr mod_name),
+ sep [ptext (sLit "Probable cause: the source code which generated"),