268 |
XSRETURN_NO; |
XSRETURN_NO; |
269 |
} |
} |
270 |
|
|
271 |
if ((items < 1) || (items > 3)) |
if (items < 1) |
272 |
{ |
{ |
273 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
274 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
315 |
XSRETURN_NO; |
XSRETURN_NO; |
316 |
} |
} |
317 |
|
|
318 |
if (items != 2) |
if (items < 2) |
319 |
{ |
{ |
320 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
321 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
351 |
XSRETURN_NO; |
XSRETURN_NO; |
352 |
} |
} |
353 |
|
|
354 |
if ((items < 1) || (items > 3)) |
if (items < 1) |
355 |
{ |
{ |
356 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
357 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
397 |
XSRETURN_NO; |
XSRETURN_NO; |
398 |
} |
} |
399 |
|
|
400 |
if (items != 2) |
if (items < 2) |
401 |
{ |
{ |
402 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
403 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
485 |
XSRETURN_NO; |
XSRETURN_NO; |
486 |
} |
} |
487 |
|
|
488 |
if (items != 2) |
if (items < 2) |
489 |
{ |
{ |
490 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
491 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
523 |
XSRETURN_NO; |
XSRETURN_NO; |
524 |
} |
} |
525 |
|
|
526 |
if ((items < 1) || (items > 2)) |
if (items < 1) |
527 |
{ |
{ |
528 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
529 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
629 |
XSRETURN_NO; |
XSRETURN_NO; |
630 |
} |
} |
631 |
|
|
632 |
if (items != 1) |
if (items < 1) |
633 |
{ |
{ |
634 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
635 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
676 |
XSRETURN_NO; |
XSRETURN_NO; |
677 |
} |
} |
678 |
|
|
679 |
if (items != 2) |
if (items < 2) |
680 |
{ |
{ |
681 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
682 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
717 |
XSRETURN_NO; |
XSRETURN_NO; |
718 |
} |
} |
719 |
|
|
720 |
if (items != 1) |
if (items < 1) |
721 |
{ |
{ |
722 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
723 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |
766 |
XSRETURN_NO; |
XSRETURN_NO; |
767 |
} |
} |
768 |
|
|
769 |
if (items != 2) |
if (items < 2) |
770 |
{ |
{ |
771 |
perl_plugin->printf_server (perl_plugin, |
perl_plugin->printf_server (perl_plugin, |
772 |
"Perl error: wrong parameters for " |
"Perl error: wrong parameters for " |