diff options
author | Ian Lynagh <ian@well-typed.com> | 2012-12-14 19:23:17 +0000 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2012-12-14 19:23:17 +0000 |
commit | 6409ba527bfd7c7b536d0c523c5f99186cd258db (patch) | |
tree | 9661d5f98e13631a4d03cd0c2ea0d7a3afc68fe5 /compiler/rename/RnExpr.lhs | |
parent | ca56668af97f534b3cff8717fc35d795a0bcb47d (diff) | |
download | haskell-6409ba527bfd7c7b536d0c523c5f99186cd258db.tar.gz |
Rename remaining FastBytes usages to ByteString
Diffstat (limited to 'compiler/rename/RnExpr.lhs')
-rw-r--r-- | compiler/rename/RnExpr.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/rename/RnExpr.lhs b/compiler/rename/RnExpr.lhs index 606549161f..6b53da3a67 100644 --- a/compiler/rename/RnExpr.lhs +++ b/compiler/rename/RnExpr.lhs @@ -1190,7 +1190,7 @@ segsToStmts empty_rec_stmt ((defs, uses, fwds, ss) : segs) fvs_later \begin{code} srcSpanPrimLit :: DynFlags -> SrcSpan -> HsExpr Name srcSpanPrimLit dflags span - = HsLit (HsStringPrim (unsafeMkFastBytesString (showSDocOneLine dflags (ppr span)))) + = HsLit (HsStringPrim (unsafeMkByteString (showSDocOneLine dflags (ppr span)))) mkAssertErrorExpr :: RnM (HsExpr Name) -- Return an expression for (assertError "Foo.hs:27") |