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/compiler/utils | |
| parent | 22f93053a78ac9b931cc51f8dec07539ad384ec3 (diff) | |
| download | haskell-6065bf1c8092705992910c65b24c909f3313a6cf.tar.gz | |
[project @ 2006-01-18 10:59:54 by simonmar]
Remove dead panic
Diffstat (limited to 'ghc/compiler/utils')
| -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 |