diff options
author | simonmar <unknown> | 2006-01-18 10:59:54 +0000 |
---|---|---|
committer | simonmar <unknown> | 2006-01-18 10:59:54 +0000 |
commit | 6065bf1c8092705992910c65b24c909f3313a6cf (patch) | |
tree | 828e9919934618ff51f1ad6e868a89f82e6f4e6c /ghc | |
parent | 22f93053a78ac9b931cc51f8dec07539ad384ec3 (diff) | |
download | haskell-6065bf1c8092705992910c65b24c909f3313a6cf.tar.gz |
[project @ 2006-01-18 10:59:54 by simonmar]
Remove dead panic
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/compiler/utils/BufWrite.hs | 1 |
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 |