avoid warning
This commit is contained in:
parent
c2dd2d6224
commit
33bd942659
2 changed files with 1 additions and 1 deletions
0
ChangeLog.md
Normal file
0
ChangeLog.md
Normal file
|
@ -735,7 +735,7 @@ mclose :: Connection -> IO ()
|
|||
#ifndef ghcjs_HOST_OS
|
||||
|
||||
mclose (Connection _
|
||||
(Just (Node2Node _ sock _ )) _ _ _ _ _ _)= NS.sClose sock
|
||||
(Just (Node2Node _ sock _ )) _ _ _ _ _ _)= NS.close sock
|
||||
|
||||
mclose (Connection node
|
||||
(Just (Node2Web sconn ))
|
||||
|
|
Loading…
Reference in a new issue