[svn:parrot] r40783 - trunk/src

[NotFound at svn.parrot.org]

Author: NotFound
Date: Tue Aug 25 11:58:01 2009
New Revision: 40783
URL: https://trac.parrot.org/parrot/changeset/40783

Log:
[cage] Underscores? What underscores?

Modified:
   trunk/src/oo.c

Modified: trunk/src/oo.c
==============================================================================
--- trunk/src/oo.c	Tue Aug 25 11:17:56 2009	(r40782)
+++ trunk/src/oo.c	Tue Aug 25 11:58:01 2009	(r40783)
@@ -143,14 +143,7 @@
             /* Look up the name of the vtable function from the index. */
             const INTVAL vtable_index = Parrot_str_to_int(interp, vtable_index_str);
             const char * const meth_c = Parrot_vtable_slot_names[vtable_index];
-            STRING     *vtable_name   = Parrot_str_new(interp, meth_c, 0);
-
-            /* Strip leading underscores in the vtable name */
-            if (Parrot_str_find_index(interp, vtable_name, CONST_STRING(interp, "__"), 0) == 0) {
-                vtable_name = Parrot_str_substr(interp, vtable_name, 2,
-                    Parrot_str_byte_length(interp, vtable_name) - 2, NULL, 0);
-            }
-
+            STRING     * const vtable_name   = Parrot_str_new(interp, meth_c, 0);
             VTABLE_add_vtable_override(interp, self, vtable_name, vtable_sub);
         }
     }