Init debug socket for Windows

MoarVM · Jul 22, 2019 · 052966b · 052966b
1 parent cfead8e
commit 052966b
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/src/debug/debugserver.c b/src/debug/debugserver.c
@@ -2565,12 +2565,25 @@ static void debugserver_worker(MVMThreadContext *tc, MVMCallsite *callsite, MVMR
     vm->debugserver->thread_id = tc->thread_obj->body.thread_id;
 
     {
+#ifdef _WIN32
+        WORD wVersionRequested;
+        WSADATA wsaData;
+#endif
         char portstr[16];
         struct addrinfo *res;
         int error;
 
         snprintf(portstr, 16, "%"PRIu64, port);
 
+#ifdef _WIN32
+        wVersionRequested = MAKEWORD(2, 2);
+
+        error = WSAStartup(wVersionRequested, &wsaData);
+        if (error != 0) {
+            MVM_panic(1, "WSAStartup failed with error: %n", error);
+        }
+#endif
+
         getaddrinfo("localhost", portstr, NULL, &res);
 
         listensocket = socket(res->ai_family, SOCK_STREAM, 0);