[inseparable changes from match from perl-5.003_97g to perl-5.003_97h]

[p5sagit/p5-mst-13.2.git] / win32 / config.H

diff --git a/win32/config.H b/win32/config.H
index 420afcc..37b50a5 100644 (file)
--- a/win32/config.H
+++ b/win32/config.H
@@ -1,6 +1,7 @@
 /*
- * This file was produced by running the config_h.SH script, on a UNIX machine
- * with config.sh set to conif.w32 from this directory
+ * This file was produced by running the config_h.SH script, which
+ * gets its values from config.sh, which is generally produced by
+ * running Configure.
  *
  * Feel free to modify any of this as the need arises.  Note, however,
  * that running config_h.SH again will wipe out any changes you've made.
@@ -279,7 +280,13 @@
  *     available to get the list of process groups.  If unavailable, multiple
  *     groups are probably not supported.
  */
+/* HAS_SETGROUPS:
+ *     This symbol, if defined, indicates that the setgroups() routine is
+ *     available to set the list of process groups.  If unavailable, multiple
+ *     groups are probably not supported.
+ */
 /*#define HAS_GETGROUPS                /**/
+/*#define HAS_SETGROUPS                /**/
 
 /* HAS_GETHOSTENT:
  *     This symbol, if defined, indicates that the gethostent routine is
@@ -971,14 +978,14 @@
 
 /* Groups_t:
  *     This symbol holds the type used for the second argument to
- *     getgroups().  Usually, this is the same of gidtype, but
+ *     [gs]etgroups().  Usually, this is the same of gidtype, but
  *     sometimes it isn't.  It can be int, ushort, uid_t, etc... 
  *     It may be necessary to include <sys/types.h> to get any 
  *     typedef'ed information.  This is only required if you have
- *     getgroups().
+ *     getgroups() or setgroups().
  */
-#ifdef HAS_GETGROUPS
-#define Groups_t gid_t /* Type for 2nd arg to getgroups() */
+#if defined(HAS_GETGROUPS) || defined(HAS_SETGROUPS)
+#define Groups_t gid_t /* Type for 2nd arg to [gs]etgroups() */
 #endif
 
 /* DB_Prefix_t:
@@ -1406,11 +1413,8 @@
  *     This symbol contains the ~name expanded version of ARCHLIB, to be used
  *     in programs that are not prepared to deal with ~ expansion at run-time.
  */
-/* This added by hand */
-#define APPLLIB_EXP (win32PerlLibPath())
-
 #define ARCHLIB "C:\\perl\\lib"                /**/
-/* #define ARCHLIB_EXP "C:\\perl\\lib"         /**/
+#define ARCHLIB_EXP "C:\\perl\\lib"            /**/
 
 /* BINCOMPAT3:
  *     This symbol, if defined, indicates that Perl 5.004 should be
@@ -1666,7 +1670,7 @@
  *     /bin/pdksh, /bin/ash, /bin/bash, or even something such as
  *     D:/bin/sh.exe.
  */
-#define SH_PATH "/bin/sh"  /**/
+#define SH_PATH "cmd /c"  /**/
 
 /* SIG_NAME:
  *     This symbol contains a list of signal names in order of
@@ -1713,7 +1717,7 @@
  *     in programs that are not prepared to deal with ~ expansion at run-time.
  */
 #define SITEARCH "C:\\perl\\lib\\site"         /**/
-/* #define SITEARCH_EXP "C:\\perl\\lib\\site"          /**/
+#define SITEARCH_EXP "C:\\perl\\lib\\site"             /**/
 
 /* SITELIB:
  *     This symbol contains the name of the private library for this package.
@@ -1770,7 +1774,8 @@
 #define M_VOID                 /* Xenix strikes again */
 #endif
 
+#endif
 #include <win32.h>
+#define ARCHLIBEXP (win32PerlLibPath())
 #define DEBUGGING
 #define MULTIPLCITY
-#endif