summaryrefslogtreecommitdiff
path: root/ghc/compiler/utils/BufWrite.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/compiler/utils/BufWrite.hs')
-rw-r--r--ghc/compiler/utils/BufWrite.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/ghc/compiler/utils/BufWrite.hs b/ghc/compiler/utils/BufWrite.hs
index b15089ead3..a03db3d084 100644
--- a/ghc/compiler/utils/BufWrite.hs
+++ b/ghc/compiler/utils/BufWrite.hs
@@ -94,7 +94,6 @@ bPutFS b@(BufHandle buf r hdl) fs@(FastString _ len _ fp _) =
else do
copyBytes (buf `plusPtr` i) ptr len
writeFastMutInt r (i+len)
-bPutFS _ _ = panic "bPutFS"
bPutLitString :: BufHandle -> Addr# -> Int# -> IO ()
bPutLitString b@(BufHandle buf r hdl) a# len# = do