Fix/Re-fudge sock error test on Windows

- The test was overly complicated as the error already occurs
    just from the first listen
- On Windows, however, this test just sits there forever,
    with no response inside the whenever
    R#2424 #2424

t/05-messages/02-errors.t

@@ -16,12 +16,14 @@ throws-like { for [:a] X [:b] -> ($i, $j) { } },
     message => / '<anon>' /,
     "anonymous subs get '<anon>' in arity error messages";
 
-throws-like {
-    sub l { IO::Socket::Async.listen: "localhost", 41139 }
-    react whenever l() {
-        whenever l() {} # try to listen on already open sock
-    }
-}, X::AdHoc, message => 'invalid argument';
+if $*DISTRO.is-win {
+    skip 'test appears to hang on Windows (long socket timeouts?); https://github.com/rakudo/rakudo/issues/2424';
+}
+else {
+    throws-like {
+        react whenever IO::Socket::Async.listen: "localhost", 2¹⁶+100 {}
+    }, X::AdHoc, message => 'invalid argument';
+}
 
 # RT #132283
 is-deeply class { has $.bar }.^methods».name.sort, <BUILDALL bar>,