diff --git a/src/c/alloc_2.d b/src/c/alloc_2.d
index 04c69ba52b46fae161110d02dc0457b9aae1cbe1..1031914a5229a4b9314ebfa386628a2628b290c8 100644
--- a/src/c/alloc_2.d
+++ b/src/c/alloc_2.d
@@ -760,12 +760,15 @@ init_alloc(void)
    *    the begining or to the first byte.
    * 3) Out of the incremental garbage collector, we only use the
    *    generational component.
-   * 4) GC should handle fork() which is used to run subprocess.
+   * 4) GC should handle fork() which is used to run subprocess on
+   *    some platforms.
    */
   GC_set_no_dls(1);
   GC_set_all_interior_pointers(0);
   GC_set_time_limit(GC_TIME_UNLIMITED);
+#ifndef ECL_MS_WINDOWS_HOST
   GC_set_handle_fork(1);
+#endif
   GC_init();
 #ifdef ECL_THREADS
 # if GC_VERSION_MAJOR > 7 || GC_VERSION_MINOR > 1