Permalink
Browse files

add hook.

  • Loading branch information...
1 parent c74b470 commit f04e24505248334aa52d525c0678394297cc5522 @kazu-yamamoto committed Jun 21, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 Network/Sendfile/BSD.hsc
View
@@ -71,6 +71,7 @@ sendfileWithHeader sock path range hook hdr =
bracket setup teardown $ \fd -> alloca $ \sentp ->
if isFreeBSD && hlen >= 8192 then do
sendMany sock hdr
+ hook
sendfile sock path range hook
else do
let (off,len) = case range of

0 comments on commit f04e245

Please sign in to comment.