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

Author: jhorwitz
Date: Tue Dec  9 11:41:20 2008
New Revision: 538

Modified:
   mod_parrot/trunk/src/mod_parrot.c

Log:
fix segfault when there is no HLL data for a cleanup handler


Modified: mod_parrot/trunk/src/mod_parrot.c
==============================================================================
--- mod_parrot/trunk/src/mod_parrot.c	(original)
+++ mod_parrot/trunk/src/mod_parrot.c	Tue Dec  9 11:41:20 2008
@@ -295,7 +295,7 @@
 
     /* call cleanup sub, passing HLL data from ci */
     status = Parrot_call_sub_ret_int(ctxp->interp, ci->callback, "IP",
-        ci->hll_data);
+        ci->hll_data ? ci->hll_data : PMCNULL);
 
     /* we don't need the data PMC anymore */
     if (!PMC_IS_NULL(data)) {