phase 1 of somewhat major rearrangement of PERL_OBJECT stuff

[p5sagit/p5-mst-13.2.git] / win32 / config_H.vc

diff --git a/win32/config_H.vc b/win32/config_H.vc
index 3c6d368..c12fedc 100644 (file)
--- a/win32/config_H.vc
+++ b/win32/config_H.vc
@@ -1348,7 +1348,7 @@
  *     function used to generate normalized random numbers.
  *     Values include 15, 16, 31, and 48.
  */
-#define Drand01()              rand()          /**/
+#define Drand01()              (rand()/(double)((unsigned)1<<RANDBITS))                /**/
 #define Rand_seed_t            unsigned                /**/
 #define seedDrand01(x) srand((Rand_seed_t)x)   /**/
 #define RANDBITS               15              /**/
@@ -1851,7 +1851,7 @@
  *     the sig_name list.
  */
 #define SIG_NAME "ZERO", "NUM01", "INT", "QUIT", "ILL", "NUM05", "NUM06", "NUM07", "FPE", "KILL", "NUM10", "SEGV", "NUM12", "PIPE", "ALRM", "TERM", "NUM16", "NUM17", "NUM18", "NUM19", "CHLD", "BREAK", "ABRT", "STOP", "NUM24", "CONT", "CLD", 0             /**/
-#define SIG_NUM  0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 20, 0                   /**/
+#define SIG_NUM  0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 20, 0           /**/
 
 /* VOIDFLAGS:
  *     This symbol indicates how much support of the void type is given by this
@@ -2268,11 +2268,11 @@
 #define SCHED_YIELD            /**/
 /*#define HAS_SCHED_YIELD      /**/
 
-/* PTHREADS_CREATED_JOINABLE:
- *     This symbol, if defined, indicates that pthreads are created
- *     in the joinable (aka undetached) state.
+/* I_MACH_CTHREADS:
+ *     This symbol, if defined, indicates to the C program that it should
+ *     include <mach/cthreads.h>.
  */
-/*#define PTHREADS_CREATED_JOINABLE /**/
+/*#define   I_MACH_CTHREADS    /**/
 
 /* MULTIPLICITY:
  *     This symbol, if defined, indicates that Perl should