diff options
| -rw-r--r-- | ext/B/B.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/B/B.pm b/ext/B/B.pm index 4cd55459e1..587b809583 100644 --- a/ext/B/B.pm +++ b/ext/B/B.pm @@ -105,8 +105,8 @@ sub B::IV::int_value { } sub B::NULL::as_string() {""} -sub B::IV::as_string() {goto &B::IV::int_value} -sub B::PV::as_string() {goto &B::PV::PV} +*B::IV::as_string = \&B::IV::int_value; +*B::PV::as_string = \&B::PV::PV; my $debug; my $op_count = 0; |