[svn:mod_parrot] r628 - mod_parrot/trunk/src/pmc

[email protected] Wed, 22 Apr 2009 09:42:47 -0700 (PDT)
Newsgroups perl.cvs.mod_parrot
Message-ID <[email protected]>
Author: jhorwitz
Date: Wed Apr 22 09:42:46 2009
New Revision: 628

Modified:
   mod_parrot/trunk/src/pmc/modparrothandle.pmc

Log:
use get_pointer to retrieve request_rec struct from object 


Modified: mod_parrot/trunk/src/pmc/modparrothandle.pmc
==============================================================================
--- mod_parrot/trunk/src/pmc/modparrothandle.pmc	(original)
+++ mod_parrot/trunk/src/pmc/modparrothandle.pmc	Wed Apr 22 09:42:46 2009
@@ -243,7 +243,7 @@
         if (r) {
             attrname = Parrot_str_new_constant(INTERP, "r");
             attrpmc = VTABLE_get_attr_str(INTERP, r, attrname);
-            rr = (request_rec *)PMC_data(attrpmc);
+            rr = (request_rec *)VTABLE_get_pointer(INTERP, attrpmc);
         }
 
         if (rr)
@@ -276,7 +276,7 @@
 
         attrname = Parrot_str_new_constant(INTERP, "r");
         attrpmc = VTABLE_get_attr_str(INTERP, r, attrname);
-        rr = (request_rec *)PMC_data(attrpmc);
+        rr = (request_rec *)VTABLE_get_pointer(INTERP, attrpmc);
 
         GET_ATTR_flags(INTERP, SELF, flags);
         if (!(flags & PIO_F_READ))
@@ -342,7 +342,7 @@
                 "Cannot read from a closed filehandle");
         attrname = Parrot_str_new_constant(INTERP, "r");
         attrpmc = VTABLE_get_attr_str(INTERP, rpmc, attrname);
-        r = (request_rec *)PMC_data(attrpmc);
+        r = (request_rec *)VTABLE_get_pointer(INTERP, attrpmc);
 
         result = Parrot_str_new_noinit(INTERP, enum_stringrep_one, 0);
         headers = r->headers_in;
@@ -426,7 +426,7 @@
 
         attrname = Parrot_str_new_constant(INTERP, "r");
         attrpmc = VTABLE_get_attr_str(INTERP, r, attrname);
-        rr = (request_rec *)PMC_data(attrpmc);
+        rr = (request_rec *)VTABLE_get_pointer(INTERP, attrpmc);
 
         GET_ATTR_flags(INTERP, SELF, flags);
         if (!(flags & PIO_F_WRITE))