Run Windows network tests as part of CI

We turned off because they were flakey on old infratstructure. Let's
see if they are better now.

Author: SeanTAllen

make.ps1

@@ -341,15 +341,15 @@ switch ($Command.ToLower())
                 {
                     if ($Uselldb -eq "yes")
                     {
-                        Write-Output "$lldbcmd $lldbargs $outDir\stdlib-debug.exe --sequential --exclude=`"net/`""
-                        $lldboutput = & $lldbcmd $lldbargs $outDir\stdlib-debug.exe --sequential --exclude="net/"
+                        Write-Output "$lldbcmd $lldbargs $outDir\stdlib-debug.exe --sequential"
+                        $lldboutput = & $lldbcmd $lldbargs $outDir\stdlib-debug.exe --sequential
                         Write-Output $lldboutput
                         $err = ($lldboutput | Select-String -Pattern 'exited with status = (\S+)').Matches[0].Groups[1].Value
                     }
                     else
                     {
-                        Write-Output "$outDir\stdlib-debug.exe --sequential --exclude=`"net/`""
-                        & $outDir\stdlib-debug.exe --sequential --exclude="net/"
+                        Write-Output "$outDir\stdlib-debug.exe --sequential"
+                        & $outDir\stdlib-debug.exe --sequential
                         $err = $LastExitCode
                     }
                 }
@@ -377,15 +377,15 @@ switch ($Command.ToLower())
                 {
                     if ($Uselldb -eq "yes")
                     {
-                        Write-Output "$lldbcmd $lldbargs $outDir\stdlib-release.exe --sequential --exclude=`"net/`""
-                        $lldboutput = & $lldbcmd $lldbargs $outDir\stdlib-release.exe --sequential --exclude="net/"
+                        Write-Output "$lldbcmd $lldbargs $outDir\stdlib-release.exe --sequential"
+                        $lldboutput = & $lldbcmd $lldbargs $outDir\stdlib-release.exe --sequential
                         Write-Output $lldboutput
                         $err = ($lldboutput | Select-String -Pattern 'exited with status = (\S+)').Matches[0].Groups[1].Value
                     }
                     else
                     {
-                        Write-Output "$outDir\stdlib-release.exe --sequential --exclude=`"net/`""
-                        & $outDir\stdlib-release.exe --sequential --exclude="net/"
+                        Write-Output "$outDir\stdlib-release.exe --sequential"
+                        & $outDir\stdlib-release.exe --sequential
                         $err = $LastExitCode
                     }
                 }

packages/net/_test.pony

@@ -1,6 +1,15 @@
 use "files"
 use "pony_test"
 
+primitive TimeoutValue
+  fun apply(): U64 =>
+    ifdef windows then
+      // Windows networking is just damn slow at many things
+      60_000_000_000
+    else
+      30_000_000_000
+    end
+
 actor \nodoc\ Main is TestList
   new create(env: Env) => PonyTest(env, this)
   new make() => None
@@ -133,7 +142,7 @@ class \nodoc\ iso _TestBroadcast is UnitTest
     h.dispose_when_done(
       UDPSocket(UDPAuth(h.env.root), recover _TestPong(h) end))
 
-    h.long_test(30_000_000_000)
+    h.long_test(TimeoutValue())
 
   fun ref timed_out(h: TestHelper) =>
     h.log("""
@@ -167,7 +176,7 @@ class \nodoc\ _TestTCP is TCPListenNotify
     h.dispose_when_done(TCPListener(TCPListenAuth(h.env.root), consume this))
     h.complete_action("server create")
 
-    h.long_test(30_000_000_000)
+    h.long_test(TimeoutValue())
 
   fun ref not_listening(listen: TCPListener ref) =>
     _h.fail_action("server listen")
@@ -685,7 +694,7 @@ class \nodoc\ _TestTCPConnectionFailed is UnitTest
       end,
       host,
       port)
-    h.long_test(30_000_000_000)
+    h.long_test(TimeoutValue())
     h.dispose_when_done(connection)
 
 class \nodoc\ _TestTCPConnectionToClosedServerFailed is UnitTest
@@ -731,7 +740,7 @@ class \nodoc\ _TestTCPConnectionToClosedServerFailed is UnitTest
     )
 
     h.dispose_when_done(listener)
-    h.long_test(30_000_000_000)
+    h.long_test(TimeoutValue())
 
 actor \nodoc\ _TCPConnectionToClosedServerFailedConnector
   be connect(h: TestHelper, host: String, port: String) =>