From: Ian Lynagh <igloo@earth.li>
Date: Sat, 12 Apr 2008 15:04:16 +0000 (+0000)
Subject: (F)SLIT -> (f)sLit in Coverage
X-Git-Tag: 2008-05-28~264
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=081963e17719aa55d28f811fd1a152c4f7e75843;p=ghc-hetmet.git

(F)SLIT -> (f)sLit in Coverage
---

diff --git a/compiler/deSugar/Coverage.lhs b/compiler/deSugar/Coverage.lhs
index 6d6f1f0..97c70e5 100644
--- a/compiler/deSugar/Coverage.lhs
+++ b/compiler/deSugar/Coverage.lhs
@@ -7,8 +7,6 @@
 \begin{code}
 module Coverage (addCoverageTicksToBinds) where
 
-#include "HsVersions.h"
-
 import HsSyn
 import Module
 import Outputable
@@ -737,7 +735,7 @@ mkHpcPos pos
 		     )
 
 hpcSrcSpan :: SrcSpan
-hpcSrcSpan = mkGeneralSrcSpan (FSLIT("Haskell Program Coverage internals"))
+hpcSrcSpan = mkGeneralSrcSpan (fsLit "Haskell Program Coverage internals")
 \end{code}