# New Ticket Created by Christoph Otto # Please include the string: [perl #51056] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=51056 >
This patch fixes some inaccurate documentation in gen_class.pl and makes generated skeleton PMCs consistent with the coding standards.
Index: tools/dev/gen_class.pl =================================================================== --- tools/dev/gen_class.pl (revision 25907) +++ tools/dev/gen_class.pl (working copy) @@ -20,6 +20,7 @@ it to C. % perl tools/dev/gen_class.pl Foo > src/pmc/foo.pmc + % perl tools/build/pmc2c.pl --dump src/pmc/foo.pmc % perl tools/build/pmc2c.pl -c src/pmc/foo.pmc =head1 SEE ALSO @@ -72,7 +73,7 @@ next if exists $skip_bodies{$methname}; next if $methname =~ /prop/; - print " $retval $methname ($args) {\n"; + print " $retval $methname($args) {\n"; if ( $retval ne 'void' ) { print $retval eq 'PMC*'