remove compiler warnings

This commit is contained in:
Hideyuki Tanaka
2010-05-05 04:28:04 +09:00
parent dbe760d6e2
commit 2f12e6c3d0
5 changed files with 8 additions and 12 deletions

View File

@@ -79,7 +79,7 @@ packToString :: MonadIO m => PackerT m r -> m ByteString
packToString m = do
sb <- liftIO $ newSimpleBuffer
pc <- liftIO $ newPacker sb
runPackerT m pc
_ <- runPackerT m pc
liftIO $ simpleBufferData sb
-- | Execcute given serializer and write byte sequence to Handle.