summaryrefslogtreecommitdiff
path: root/src/Data/PacketQueue.hs
diff options
context:
space:
mode:
authorjim@bo <jim@bo>2018-06-21 04:13:29 -0400
committerjim@bo <jim@bo>2018-06-21 04:13:29 -0400
commitb220a9c00c8b5a287cb255de62faa2994bb6a56e (patch)
treea04cc0acd9929a3bd2fa11d65e99bda6fc65c34c /src/Data/PacketQueue.hs
parent8cdc2de72ebe8945ce4b9f7fe8890970c34135a1 (diff)
fix misleading comment
Diffstat (limited to 'src/Data/PacketQueue.hs')
-rw-r--r--src/Data/PacketQueue.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Data/PacketQueue.hs b/src/Data/PacketQueue.hs
index 330934cd..1e79b851 100644
--- a/src/Data/PacketQueue.hs
+++ b/src/Data/PacketQueue.hs
@@ -38,7 +38,7 @@ data PacketQueue a = PacketQueue
38 { pktq :: TArray Word32 (Maybe a) 38 { pktq :: TArray Word32 (Maybe a)
39 , seqno :: TVar Word32 39 , seqno :: TVar Word32
40 , qsize :: Word32 40 , qsize :: Word32
41 , buffend :: TVar Word32 -- on incoming, highest packet number handled + 1 41 , buffend :: TVar Word32 -- on incoming, next packet they'll send + 1
42 , qOverWriteMode :: Bool -- TODO: Remove me, use Data.CyclicBuffer instead. 42 , qOverWriteMode :: Bool -- TODO: Remove me, use Data.CyclicBuffer instead.
43 } 43 }
44 44