From:	Whiteknight@cvs.perl.org	Date:	Tue Aug 19 17:04:20 2008
Subject:	[svn:parrot] r30359 - branches/pdd27mmd/src/pmc

Author: Whiteknight
Date: Tue Aug 19 16:04:19 2008
New Revision: 30359

Modified:
   branches/pdd27mmd/src/pmc/multisub.pmc

Log:
[PMC] Add a basic implementation of the get_pmc vtable method for the multisub pmc. needs testing

Modified: branches/pdd27mmd/src/pmc/multisub.pmc
==============================================================================
--- branches/pdd27mmd/src/pmc/multisub.pmc	(original)
+++ branches/pdd27mmd/src/pmc/multisub.pmc	Tue Aug 19 16:04:19 2008
@@ -78,6 +78,15 @@
         return VTABLE_get_iter(interp, list);
     }
 
+    VTABLE PMC *get_pmc() {
+        PMC * const list = Parrot_mmd_sort_manhattan(INTERP, SELF);
+
+        if (PMC_IS_NULL(list))
+            Parrot_ex_throw_from_c_args(INTERP, NULL, 1, "No applicable methods.\n");
+
+        return list;
+    }
+
     /* stub get_iter method. Takes an argument list PMC, sorts the subs in the
        multi according to the closeness to that list, and returns an iterator
        over the sorted list of subs. Or, it could take a string PMC where