diff options
Diffstat (limited to 'contrib/perl5/minimod.pl')
-rw-r--r-- | contrib/perl5/minimod.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/perl5/minimod.pl b/contrib/perl5/minimod.pl index 8efbd31..18b9c07 100644 --- a/contrib/perl5/minimod.pl +++ b/contrib/perl5/minimod.pl @@ -59,7 +59,7 @@ sub writemain{ my($mname, $cname); ($mname = $pname) =~ s!/!::!g; ($cname = $pname) =~ s!/!__!g; - print "EXTERN_C void boot_${cname} (CV* cv);\n"; + print "EXTERN_C void boot_${cname} (pTHX_ CV* cv);\n"; } my ($tail1,$tail2) = ( $tail =~ /\A(.*\n)(\s*\}.*)\Z/s ); |