From 6065bf1c8092705992910c65b24c909f3313a6cf Mon Sep 17 00:00:00 2001 From: simonmar Date: Wed, 18 Jan 2006 10:59:54 +0000 Subject: [PATCH] [project @ 2006-01-18 10:59:54 by simonmar] Remove dead panic --- ghc/compiler/utils/BufWrite.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/ghc/compiler/utils/BufWrite.hs b/ghc/compiler/utils/BufWrite.hs index b15089e..a03db3d 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 -- 1.7.10.4