diff options
| author | Will Thompson <will@willthompson.co.uk> | 2012-04-25 07:54:56 +0100 |
|---|---|---|
| committer | Will Thompson <will@willthompson.co.uk> | 2012-04-25 07:54:56 +0100 |
| commit | 575bc3440f13dc4c30cddad9f5c7484541b13243 (patch) | |
| tree | f1d34c93e59df2722f5c5dab21f83960060c18ce | |
| parent | 908c447f9787600dbb8d8369f693c937bc5c98b7 (diff) | |
pcap: note where the memory pain supposedly starts
| -rw-r--r-- | Bustle/Loader/Pcap.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Bustle/Loader/Pcap.hs b/Bustle/Loader/Pcap.hs index 3e4b9ed..e24d3d0 100644 --- a/Bustle/Loader/Pcap.hs +++ b/Bustle/Loader/Pcap.hs @@ -235,6 +235,8 @@ readOne p f = do then return EOF else liftM Packet $ f (fromIntegral (hdrTime hdr)) body +-- This shows up as the biggest thing on the heap profile. Which is kind of a +-- surprise. It's supposedly the list. mapBodies :: (Monad m, MonadIO m) => PcapHandle -> (B.Microseconds -> BS.ByteString -> StateT s m (Either e a)) |