yogsototh/transient-universe
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

avoid warning

Browse source
This commit is contained in:
Alberto G. Corona 2017-03-04 12:03:02 +01:00
parent c2dd2d6224
commit 33bd942659
2 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

0
ChangeLog.md Normal file
View file

2
src/Transient/Move/Internals.hs
View 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 ))