win32/perlhost.h: use symbolic constant

CLONEf_COPY_STACKS rather than 1

diff --git a/win32/perlhost.h b/win32/perlhost.h
index 6e3fcd2..c2473c9 100644 (file)
--- a/win32/perlhost.h
+++ b/win32/perlhost.h
@@ -1835,7 +1835,8 @@ PerlProcFork(struct IPerlProc* piPerl)
        return -1;
     }
     h = new CPerlHost(*(CPerlHost*)w32_internal_host);
-    PerlInterpreter *new_perl = perl_clone_using((PerlInterpreter*)aTHX, 1,
+    PerlInterpreter *new_perl = perl_clone_using((PerlInterpreter*)aTHX,
+                                                CLONEf_COPY_STACKS,
                                                 h->m_pHostperlMem,
                                                 h->m_pHostperlMemShared,
                                                 h->m_pHostperlMemParse,