[svn:parrot] r18201 - trunk/src/pmc

[jonathan]

Author: jonathan
Date: Sat Apr 14 10:14:32 2007
New Revision: 18201

Modified:
   trunk/src/pmc/namespace.pmc

Log:
[PDD15]: Correct set_class method on the NameSpace PMC, and make set_class and 
get_class PCCMETHODs.

Modified: trunk/src/pmc/namespace.pmc
==============================================================================
--- trunk/src/pmc/namespace.pmc (original)
+++ trunk/src/pmc/namespace.pmc Sat Apr 14 10:14:32 2007
@@ -635,7 +635,7 @@
 
 /*
 
-=item C<METHOD PMC* get_class()>
+=item C<PCCMETHOD PMC* get_class()>
 
 Returns the class or role PMC that is associated with this namespace.
 
@@ -643,15 +643,16 @@
 
 */
 
-    METHOD PMC* get_class()
+    PCCMETHOD void get_class()
     {
         Parrot_NSInfo *nsinfo = PARROT_NSINFO(SELF);
-        return nsinfo->class;
+        PMC *ret_class = nsinfo->class;
+        PCCRETURN(PMC *ret_class);
     }
 
 /*
 
-=item C<METHOD void set_class(PMC *class_or_role)>
+=item C<PCCMETHOD void set_class(PMC *class_or_role)>
 
 Sets the class or role PMC that is associated with this namespace.
 
@@ -659,7 +660,7 @@
 
 */
 
-    METHOD set_class(PMC *class_or_role)
+    PCCMETHOD void set_class(PMC *class_or_role)
     {
         Parrot_NSInfo *nsinfo = PARROT_NSINFO(SELF);
         nsinfo->class = class_or_role;