[Win32] Initialize Windows Runtime on queue thread

Author: triplef

src/CMakeLists.txt

@@ -144,7 +144,8 @@ if(CMAKE_SYSTEM_NAME STREQUAL Windows)
     ShLwApi
     WS2_32
     WinMM
-    synchronization)
+    synchronization
+    WindowsApp)
 endif()
 
 if(CMAKE_SYSTEM_NAME STREQUAL Darwin)

src/queue.c

@@ -22,6 +22,9 @@
 #if HAVE_MACH
 #include "protocol.h" // _dispatch_send_wakeup_runloop_thread
 #endif
+#if defined(_WIN32)
+#include <roapi.h> // RoInitialize
+#endif
 
 static inline void _dispatch_root_queues_init(void);
 static void _dispatch_lane_barrier_complete(dispatch_lane_class_t dqu,
@@ -6264,8 +6267,15 @@ _dispatch_worker_thread(void *context)
 static unsigned WINAPI
 _dispatch_worker_thread_thunk(LPVOID lpParameter)
 {
-  _dispatch_worker_thread(lpParameter);
-  return 0;
+	HRESULT hr = RoInitialize(RO_INIT_MULTITHREADED);
+
+	_dispatch_worker_thread(lpParameter);
+
+	if (SUCCEEDED(hr)) {
+		RoUninitialize();
+	}
+
+	return 0;
 }
 #endif // defined(_WIN32)
 #endif // DISPATCH_USE_PTHREAD_POOL