Calling Methods on Class PMCs

[chromatic]

I'm experimenting with better forms of OO in PIR.  I want to add a 
get_parents() method on the Class PMC.  Normally, I'd do something like the 
attached patch, but the attached example file I use for testing shows that it 
doesn't work for me.

I dug around a bit and couldn't find a reason for why it shouldn't work.

Note that I can't even call name() on a Class PMC either.  Hm.

-- c

=== src/pmc/parrotclass.pmc
==================================================================
--- src/pmc/parrotclass.pmc	(revision 22961)
+++ src/pmc/parrotclass.pmc	(local)
@@ -325,6 +325,25 @@
         class_data[PCD_MAX + 1] = NULL;
     }
 
+/*
+
+=item C<METHOD PMC* get_parents()>
+
+Returns the array of parents for this class.
+
+=cut
+
+*/
+
+    METHOD PMC* get_parents() {
+        PMC * class;
+        PMC **class_data;
+        
+        class      = SELF;
+        class_data = (PMC**)(PMC_data(class));
+        return class_data[PCD_PARENTS];
+    }
+
 }
 
 /*