fix: Panic when attempting to run with unix socket on non-unix host

This commit is contained in:
monacoremo
2021-04-24 19:42:58 +02:00
committed by Remo Rechkemmer
parent 59f0fe5b32
commit 63e0292e23
4 changed files with 17 additions and 13 deletions
+3 -3
View File
@@ -31,11 +31,11 @@ installSignalHandlers = Unix.installSignalHandlers
installSignalHandlers _ = pass
#endif
runAppInSocket :: App.SocketRunner
runAppInSocket :: Maybe App.SocketRunner
#ifndef mingw32_HOST_OS
runAppInSocket = Unix.runAppInSocket
runAppInSocket = Just Unix.runAppWithSocket
#else
runAppInSocket _ _ _ _ = pass
runAppInSocket = Nothing
#endif
setBuffering :: IO ()