LWP and SIG __DIE__ traps not playing well together!

[p5sagit/p5-mst-13.2.git] / vms / config.vms

diff --git a/vms/config.vms b/vms/config.vms
index 75bf302..cba3361 100644 (file)
--- a/vms/config.vms
+++ b/vms/config.vms
@@ -8,7 +8,7 @@
  * GenConfig.pl when producing Config.pm.
  *
  * config.h for VMS
- * Version: 5.003_08
+ * Version: 5.004
  */                 
 
 /* Configuration time: 19-Nov-1996 23:34
@@ -76,7 +76,7 @@
  * when Perl is built.  Please do not change it by hand; make
  * any changes to FndVers.Com instead.
  */
-#define ARCHLIB_EXP "/perl_root/lib/VMS_VAX/5_00323"  /**/
+#define ARCHLIB_EXP "/perl_root/lib/VMS_VAX/5_004"     /**/
 #define ARCHLIB ARCHLIB_EXP    /*config-skip*/
 
 /* ARCHNAME:
@@ -114,17 +114,24 @@
  */
 #undef HAS_BCMP        /**/
 
+#include <string.h> /* Check whether new DECC has #defined bcopy and bzero */
 /* HAS_BCOPY:
  *     This symbol is defined if the bcopy() routine is available to
  *     copy blocks of memory.
  */
 #undef HAS_BCOPY       /**/
+#ifdef bcopy
+#  define HAS_BCOPY            /*config-skip*/
+#endif
 
 /* HAS_BZERO:
  *     This symbol is defined if the bzero() routine is available to
  *     set a memory block to 0.
  */
 #undef HAS_BZERO       /**/
+#ifdef bzero
+#  define HAS_BZERO            /*config-skip*/
+#endif
 
 /* CASTNEGFLOAT:
  *     This symbol is defined if the C compiler can cast negative
@@ -236,7 +243,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.
+ */
 #undef HAS_GETGROUPS           /**/
+#undef HAS_SETGROUPS           /**/
 
 /* HAS_UNAME:
  *     This symbol, if defined, indicates that the C program may use the
@@ -949,7 +962,11 @@
  *     is defined, and 'int *' otherwise.  This is only useful if you 
  *     have select(), of course.
  */
-#define Select_fd_set_t        int *   /**/
+#if defined(__DECC) && defined(__DECC_VER) && (__DECC_VER >= 50200000)
+#define Select_fd_set_t                fd_set *        /* config-skip */
+#else
+#define Select_fd_set_t                int *           /**/
+#endif
 
 /* STDCHAR:
  *     This symbol is defined to be the type of char used in stdio.h.
@@ -972,7 +989,12 @@
  *     This symbol holds the path of the bin directory where the package will
  *     be installed. Program must be prepared to deal with ~name substitution.
  */
+/* BIN_EXP:
+ *     This symbol is the filename expanded version of the BIN symbol, for
+ *     programs that do not want to deal with that at run-time.
+ */
 #define BIN "/perl_root/000000"        /**/
+#define BIN_EXP "/perl_root/000000"    /**/
 
 /* HAS_ALARM:
  *     This symbol, if defined, indicates that the alarm routine is
@@ -1263,7 +1285,17 @@
  *     This symbol contains the size of an int, so that the C preprocessor
  *     can make decisions based on it.
  */
+/* LONGSIZE:
+ *     This symbol contains the value of sizeof(long) so that the C
+ *     preprocessor can make decisions based on it.
+ */
+/* SHORTSIZE:
+ *     This symbol contains the value of sizeof(short) so that the C
+ *     preprocessor can make decisions based on it.
+ */
 #define INTSIZE 4              /**/
+#define LONGSIZE 4             /**/
+#define SHORTSIZE 2            /**/
 
 /* Off_t:
  *     This symbol holds the type used to declare offsets in the kernel.
@@ -1449,14 +1481,6 @@
 #define SITEARCH_EXP "/perl_root/lib/site_perl/VMS_VAX"  /**/
 #define SITEARCH SITEARCH_EXP  /*config-skip*/
 
-/* SCRIPTDIR:
- *     This symbol holds the name of the directory in which the user wants
- *     to put publicly executable scripts for the package in question.  It
- *     is often a directory that is mounted across diverse architectures.
- *     Programs must be prepared to deal with ~name expansion.
- */
-#define SCRIPTDIR "/perl_root/script"  /**/
-
 /* Size_t:
  *     This symbol holds the type used to declare length parameters
  *     for string functions.  It is usually size_t, but may be
@@ -1720,14 +1744,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 unsigned int  /* Type for 2nd arg to getgroups() */  /* config-skip */
+#if defined(HAS_GETGROUPS) || defined(HAS_SETGROUPS)
+#define Groups_t unsigned int  /* config-skip */
 #endif
 
 /* DB_Prefix_t: