Ticket #1354 (closed patch: fixed)
[patch]removed unused codes from Vtable.pm
| Reported by: | jimmy | Owned by: | |
|---|---|---|---|
| Priority: | normal | Milestone: | |
| Component: | core | Version: | 1.8.0 |
| Severity: | medium | Keywords: | |
| Cc: | Language: | ||
| Patch status: | new | Platform: |
Description
removed unused codes from Vtable.pm
Index: lib/Parrot/Vtable.pm
===================================================================
--- lib/Parrot/Vtable.pm (版本 42868)
+++ lib/Parrot/Vtable.pm (工作副本)
@@ -224,25 +224,12 @@
(pmc)->vtable->$entry->[1]($args)
EOM
}
- $macros .= <<'EOM';
-
+ # Slot numbers
+ $macros .= <<"EOM";
/*
- * vtable method name defines for delegate
+ * vtable slot names
*/
-
EOM
- for my $entry ( @{$vtable} ) {
- my $uc_meth = uc $entry->[1];
- $macros .= <<"EOM";
-#define PARROT_VTABLE_${uc_meth}_METHNAME \"$entry->[1]\"
-EOM
-
- }
- $macros .= <<'EOM';
-
-EOM
-
- # Slot numbers
my $vtable_slot_num = 9;
for my $entry ( @{$vtable} ) {
my $uc_meth = uc $entry->[1];
@@ -254,9 +241,7 @@
# finally the name mapping
$macros .= <<'EOM';
-/*
- * vtable slot names
- */
+
#ifdef PARROT_IN_OBJECTS_C
#define PARROT_VTABLE_LOW 9
Attachments
Change History
Note: See
TracTickets for help on using
tickets.

