CVS: caudium/src/cmods/_Caudium caudium.c,1.142,1.143

[Xavier Beaudouin <kiwi AT cvs.caudiumforge.net>]

Update of /cvs/caudium/caudium/src/cmods/_Caudium
In directory cvs.caudiumforge.net:/tmp/cvs-serv50176

Modified Files:
        caudium.c 
Log Message:
Use 100 as num_program value


Index: caudium.c
===================================================================
RCS file: /cvs/caudium/caudium/src/cmods/_Caudium/caudium.c,v
retrieving revision 1.142
retrieving revision 1.143
diff -u -r1.142 -r1.143
--- caudium.c   20 Jul 2004 11:03:43 -0000      1.142
+++ caudium.c   20 Jul 2004 13:51:09 -0000      1.143
@@ -18,11 +18,11 @@
  *
  */
 /*
- * $Id: caudium.c,v 1.142 2004/07/20 11:03:43 kiwi Exp $
+ * $Id: caudium.c,v 1.143 2004/07/20 13:51:09 kiwi Exp $
  */
 
 #include "global.h"
-RCSID("$Id: caudium.c,v 1.142 2004/07/20 11:03:43 kiwi Exp $");
+RCSID("$Id: caudium.c,v 1.143 2004/07/20 13:51:09 kiwi Exp $");
 #include "caudium_util.h"
 #include "caudium_machine.h"
 #include "entparse.h"
@@ -71,7 +71,7 @@
 /*
 **! file: Caudium/caudium.c
 **!  Caudium specific classes and functions.
-**! cvs_version: $Id: caudium.c,v 1.142 2004/07/20 11:03:43 kiwi Exp $
+**! cvs_version: $Id: caudium.c,v 1.143 2004/07/20 13:51:09 kiwi Exp $
 */
 
 /*
@@ -1838,8 +1838,14 @@
   struct svalue o_sv;
 
   pop_n_elems(args);
-  /*push_mapping(m = allocate_mapping(num_program)); */
+  /*push_mapping(m = allocate_mapping(num_program));
   push_mapping(m = 
allocate_mapping(Pike_compiler->new_program->num_program));
+  */
+  /* Grubba told me to make a static value instead of that... because it is
+   * about 64k
+   * See pike ml for that
+   */
+  push_mapping(m = allocate_mapping(100));
 
   o_sv.type = PIKE_T_OBJECT;
   o_sv.subtype = 0;