diff --git a/sandwich-contexts/lib/Test/Sandwich/Contexts/ReverseProxy/TCP.hs b/sandwich-contexts/lib/Test/Sandwich/Contexts/ReverseProxy/TCP.hs
index cbafbe00..6e0cdd36 100644
--- a/sandwich-contexts/lib/Test/Sandwich/Contexts/ReverseProxy/TCP.hs
+++ b/sandwich-contexts/lib/Test/Sandwich/Contexts/ReverseProxy/TCP.hs
@@ -5,6 +5,8 @@
 
 module Test.Sandwich.Contexts.ReverseProxy.TCP where
 
+#ifndef mingw32_HOST_OS
+
 import Control.Monad.IO.Unlift
 import Data.Conduit
 import qualified Data.Conduit.Network as DCN
@@ -36,3 +38,5 @@ withProxyToUnixSocket socketPath f = do
       concurrently_
         (runConduit $ DCN.appSource appdata .| DCN.appSink appdataServer)
         (runConduit $ DCN.appSource appdataServer .| DCN.appSink appdata)
+
+#endif