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

Author: Whiteknight
Date: Tue Aug 19 15:19:02 2008
New Revision: 30357

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

Log:
[PMC] Add a basic get_iter vtable method for the multisub pmc. Needs tests. Also, added a quick stub and some comments for a get_iter method.

Modified: branches/pdd27mmd/src/pmc/multisub.pmc
==============================================================================
--- branches/pdd27mmd/src/pmc/multisub.pmc	(original)
+++ branches/pdd27mmd/src/pmc/multisub.pmc	Tue Aug 19 15:19:02 2008
@@ -69,6 +69,22 @@
         func = VTABLE_get_pmc_keyed_int(interp, list, 0);
         return VTABLE_invoke(INTERP, func, next);
     }
+
+    VTABLE PMC *get_iter() {
+        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 VTABLE_get_iter(interp, 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
+       type letters (P S N I) are whitespace delimited. */
+    METHOD PMC *get_iter(PMC *list) {
+    }
+
 }
 
 /*