File tree Expand file tree Collapse file tree 1 file changed +11
-11
lines changed
dist/ExtUtils-ParseXS/lib/ExtUtils Expand file tree Collapse file tree 1 file changed +11
-11
lines changed Original file line number Diff line number Diff line change @@ -1171,28 +1171,28 @@ EOF
1171
1171
1172
1172
1173
1173
{
1174
- # the code to emit to determine whether the correct number of argument
1175
- # have been passed
1176
- my $condition_code = set_cond($seen_ellipsis , $min_arg_count , $args_count );
1174
+ # the code to emit to determine whether the correct number of argument
1175
+ # have been passed
1176
+ my $condition_code = set_cond($seen_ellipsis , $min_arg_count , $args_count );
1177
1177
1178
- print Q(<<"EOF" ) if $self -> {except }; # "-except" cmd line switch
1178
+ print Q(<<"EOF" ) if $self -> {except }; # "-except" cmd line switch
1179
1179
# char errbuf[1024];
1180
1180
# *errbuf = '\\ 0';
1181
1181
EOF
1182
1182
1183
- if ($condition_code ) {
1184
- print Q(<<"EOF" );
1183
+ if ($condition_code ) {
1184
+ print Q(<<"EOF" );
1185
1185
# if ($condition_code )
1186
1186
# croak_xs_usage(cv, "$report_args ");
1187
1187
EOF
1188
- }
1189
- else {
1190
- # cv and items likely to be unused
1191
- print Q(<<"EOF" );
1188
+ }
1189
+ else {
1190
+ # cv and items likely to be unused
1191
+ print Q(<<"EOF" );
1192
1192
# PERL_UNUSED_VAR(cv); /* -W */
1193
1193
# PERL_UNUSED_VAR(items); /* -W */
1194
1194
EOF
1195
- }
1195
+ }
1196
1196
}
1197
1197
1198
1198
# gcc -Wall: if an XSUB has PPCODE, it is possible that none of ST,
You can’t perform that action at this time.
0 commit comments