[svn:parrot] r38302 - branches/pmc_pct/src/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Apr 24 13:45:23 2009
New Revision: 38302
URL: https://trac.parrot.org/parrot/changeset/38302

Log:
[cage] Remove dead elements_keyed_int and set_bool_keyed_int, add more VTABLE in default.pmc

Modified:
   branches/pmc_pct/src/pmc/default.pmc

Modified: branches/pmc_pct/src/pmc/default.pmc
==============================================================================
--- branches/pmc_pct/src/pmc/default.pmc	Fri Apr 24 13:45:08 2009	(r38301)
+++ branches/pmc_pct/src/pmc/default.pmc	Fri Apr 24 13:45:23 2009	(r38302)
@@ -538,23 +538,6 @@
 
 /*
 
-=item C<INTVAL elements_keyed_int(INTVAL key)>
-
-Converts C<key> to a PMC key and returns the result of calling
-C<elements_keyed()> with it.
-
-=cut
-
-*/
-
-    INTVAL elements_keyed_int(INTVAL key) {
-        PMC *const r_key = INT2KEY(INTERP, key);
-        return SELF.elements_keyed(r_key);
-    }
-
-
-/*
-
 =item C<PMC *get_pmc_keyed_int(INTVAL key)>
 
 Converts C<key> to a PMC key and returns the result of calling
@@ -687,22 +670,6 @@
 
 /*
 
-=item C<void set_bool_keyed_int(INTVAL key, INTVAL value)>
-
-Converts C<key> to a PMC key and calls C<set_bool_keyed()> with it
-and C<value>.
-
-=cut
-
-*/
-
-    void set_bool_keyed_int(INTVAL key, INTVAL value) {
-        PMC *const r_key = INT2KEY(INTERP, key);
-        SELF.set_bool_keyed(r_key, value);
-    }
-
-/*
-
 =item C<void set_pmc_keyed_int(INTVAL key, PMC *value)>
 
 Converts C<key> to a PMC key and calls C<set_pmc_keyed()> with it
@@ -890,7 +857,7 @@
 
 */
 
-    INTVAL does_pmc(PMC *role) {
+    VTABLE INTVAL does_pmc(PMC *role) {
         UNUSED(role)
         /* No C-level roles yet. */
         return 0;
@@ -945,7 +912,7 @@
 
 */
 
-    PMC *inspect_str(STRING *name) {
+    VTABLE PMC *inspect_str(STRING *name) {
         if (Parrot_str_equal(interp, name, CONST_STRING(interp, "flags"))) {
             PMC *found = pmc_new(interp, enum_class_Integer);
             VTABLE_set_integer_native(interp, found,
@@ -970,7 +937,7 @@
 =cut
 
 */
-    PMC *inspect() {
+    VTABLE PMC *inspect() {
         PMC    *metadata           = pmc_new(interp, enum_class_Hash);
         STRING * const flags_str   = CONST_STRING(interp, "flags");