fixup: fix windows

IntersectMBO · Feb 11, 2025 · d5bc899 · d5bc899
1 parent e7fb5de
commit d5bc899
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/network-mux/src/Network/Mux/Bearer/Socket.hs b/network-mux/src/Network/Mux/Bearer/Socket.hs
@@ -116,7 +116,7 @@ socketAsMuxBearer sduSize batchSize readBuffer readBufferSize sduTimeout tracer
           if BL.null availableData
              then do
 #if defined(mingw32_HOST_OS)
-                 buf <- Win32.Async.recv sd (max l readBufferSize)
+                 buf <- Win32.Async.recv sd (fromIntegral $ max l readBufferSize)
 #else
                  buf <- Socket.recv sd (max l readBufferSize)
 #endif