[svn:mod_parrot] r604 - mod_parrot/trunk/src

Author: jhorwitz
Date: Fri Feb  6 06:15:30 2009
New Revision: 604

Modified:
   mod_parrot/trunk/src/module.c

Log:
replace deprecated SArray with RPA
cache context pool name in minfo



Modified: mod_parrot/trunk/src/module.c
==============================================================================
--- mod_parrot/trunk/src/module.c	(original)
+++ mod_parrot/trunk/src/module.c	Fri Feb  6 06:15:30 2009
@@ -170,7 +170,7 @@
     Parrot_PMC args;
     int i=0, typenum;
 
-    typenum = Parrot_PMC_typenum(interp, "SArray");
+    typenum = Parrot_PMC_typenum(interp, "ResizablePMCArray");
     args = (Parrot_PMC)Parrot_PMC_new(interp, typenum);
     Parrot_register_pmc(interp, args);
     Parrot_PMC_set_intval(interp, args, nargs);
@@ -209,7 +209,14 @@
                cmd->directive->directive);
 
     /* mod_parrot specific stuff */
-    ctx_pool_name = modparrot_find_ctx_pool_name(cmd->pool, minfo->ctx_pool);
+    if (!minfo->ctx_pool_name) {
+        ctx_pool_name = modparrot_find_ctx_pool_name(cmd->pool,
+            minfo->ctx_pool);
+        minfo->ctx_pool_name = ctx_pool_name; /* assuming cmd->pool is ok */
+    }
+    else {
+        ctx_pool_name = minfo->ctx_pool_name;
+    }
     ctxp = modparrot_startup(cmd->temp_pool, cmd->server, NULL, ctx_pool_name);
     ctxp->pconf = cmd->pool;