s/comment/comment_t/ tweak (suggested by John Gorman

[p5sagit/p5-mst-13.2.git] / ext / B / B / Disassembler.pm

diff --git a/ext/B/B/Disassembler.pm b/ext/B/B/Disassembler.pm
index f26441d..4a008a3 100644 (file)
--- a/ext/B/B/Disassembler.pm
+++ b/ext/B/B/Disassembler.pm
@@ -77,7 +77,7 @@ sub GET_PV {
     }
 }
 
-sub GET_comment {
+sub GET_comment_t {
     my $fh = shift;
     my ($str, $c);
     while (defined($c = $fh->getc) && $c ne "\n") {