diff options
| author | Andy Lester <andy@petdance.com> | 2005-06-22 04:41:00 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-23 08:39:44 +0000 |
| commit | 1b6737cc10a847650f574c35f419cbd680a5a5ef (patch) | |
| tree | b96d16d5faf3db00f9c9488a814c8a8d6a217387 /embed.pl | |
| parent | 89e33a0587050e7ef2e88ba45c87444d8506f821 (diff) | |
| download | perl-1b6737cc10a847650f574c35f419cbd680a5a5ef.tar.gz | |
Const Boy II: The Localizing
Message-ID: <20050622144059.GA19598@petdance.com>
p4raw-id: //depot/perl@24945
Diffstat (limited to 'embed.pl')
| -rwxr-xr-x | embed.pl | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -195,6 +195,7 @@ sub write_protos { for my $arg ( @args ) { ++$n; push( @nonnull, $n ) if ( $arg =~ s/\s*\bNN\b\s+// ); + $arg =~ s/\s*\bNULLOK\b\s+//; # strip NULLOK with no effect } $ret .= join ", ", @args; } @@ -953,3 +954,5 @@ my %vfuncs = qw( Perl_dump_indent Perl_dump_vindent Perl_default_protect Perl_vdefault_protect ); + +# ex: set ts=8 sts=4 sw=4 noet: |