Update Changes; update Configure.

[p5sagit/p5-mst-13.2.git] / embed.h

diff --git a/embed.h b/embed.h
index 805fd0d..747224f 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -133,6 +133,11 @@
 #define do_close               Perl_do_close
 #define do_eof                 Perl_do_eof
 #define do_exec                        Perl_do_exec
+#if defined(WIN32)
+#define do_aspawn              Perl_do_aspawn
+#define do_spawn               Perl_do_spawn
+#define do_spawn_nowait                Perl_do_spawn_nowait
+#endif
 #if !defined(WIN32)
 #define do_exec3               Perl_do_exec3
 #endif
@@ -1700,6 +1705,11 @@
 #define do_close(a,b)          Perl_do_close(aTHX_ a,b)
 #define do_eof(a)              Perl_do_eof(aTHX_ a)
 #define do_exec(a)             Perl_do_exec(aTHX_ a)
+#if defined(WIN32)
+#define do_aspawn(a,b,c)       Perl_do_aspawn(aTHX_ a,b,c)
+#define do_spawn(a)            Perl_do_spawn(aTHX_ a)
+#define do_spawn_nowait(a)     Perl_do_spawn_nowait(aTHX_ a)
+#endif
 #if !defined(WIN32)
 #define do_exec3(a,b,c)                Perl_do_exec3(aTHX_ a,b,c)
 #endif
@@ -2671,7 +2681,7 @@
 #  endif
 #define expect_number(a)       S_expect_number(aTHX_ a)
 #  if defined(USE_ITHREADS)
-#define gv_share(a)            S_gv_share(aTHX_ a)
+#define gv_share(a,b)          S_gv_share(aTHX_ a,b)
 #  endif
 #endif
 #if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT)