Current File : //usr/local/apps/perl/lib/site_perl/5.30.0/x86_64-linux/nc_tparm.ph |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
eval 'sub TPARM_ARG () {\'long\';}' unless defined(&TPARM_ARG);
unless(defined(&TPARM_N)) {
sub TPARM_N {
my($n) = @_;
eval q(( &TPARM_ARG)($n));
}
}
unless(defined(&TPARM_9)) {
sub TPARM_9 {
my($a,$b,$c,$d,$e,$f,$g,$h,$i,$j) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e), &TPARM_N($f), &TPARM_N($g), &TPARM_N($h), &TPARM_N($i), &TPARM_N($j)));
}
}
if((defined(&NCURSES_TPARM_VARARGS) ? &NCURSES_TPARM_VARARGS : undef)) {
eval 'sub TPARM_8 {
my($a,$b,$c,$d,$e,$f,$g,$h,$i) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e), &TPARM_N($f), &TPARM_N($g), &TPARM_N($h), &TPARM_N($i)));
}' unless defined(&TPARM_8);
eval 'sub TPARM_7 {
my($a,$b,$c,$d,$e,$f,$g,$h) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e), &TPARM_N($f), &TPARM_N($g), &TPARM_N($h)));
}' unless defined(&TPARM_7);
eval 'sub TPARM_6 {
my($a,$b,$c,$d,$e,$f,$g) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e), &TPARM_N($f), &TPARM_N($g)));
}' unless defined(&TPARM_6);
eval 'sub TPARM_5 {
my($a,$b,$c,$d,$e,$f) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e), &TPARM_N($f)));
}' unless defined(&TPARM_5);
eval 'sub TPARM_4 {
my($a,$b,$c,$d,$e) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d), &TPARM_N($e)));
}' unless defined(&TPARM_4);
eval 'sub TPARM_3 {
my($a,$b,$c,$d) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c), &TPARM_N($d)));
}' unless defined(&TPARM_3);
eval 'sub TPARM_2 {
my($a,$b,$c) = @_;
eval q( &tparm($a, &TPARM_N($b), &TPARM_N($c)));
}' unless defined(&TPARM_2);
eval 'sub TPARM_1 {
my($a,$b) = @_;
eval q( &tparm($a, &TPARM_N($b)));
}' unless defined(&TPARM_1);
eval 'sub TPARM_0 {
my($a) = @_;
eval q( &tparm($a));
}' unless defined(&TPARM_0);
} else {
eval 'sub TPARM_8 {
my($a,$b,$c,$d,$e,$f,$g,$h,$i) = @_;
eval q( &TPARM_9($a,$b,$c,$d,$e,$f,$g,$h,$i,0));
}' unless defined(&TPARM_8);
eval 'sub TPARM_7 {
my($a,$b,$c,$d,$e,$f,$g,$h) = @_;
eval q( &TPARM_8($a,$b,$c,$d,$e,$f,$g,$h,0));
}' unless defined(&TPARM_7);
eval 'sub TPARM_6 {
my($a,$b,$c,$d,$e,$f,$g) = @_;
eval q( &TPARM_7($a,$b,$c,$d,$e,$f,$g,0));
}' unless defined(&TPARM_6);
eval 'sub TPARM_5 {
my($a,$b,$c,$d,$e,$f) = @_;
eval q( &TPARM_6($a,$b,$c,$d,$e,$f,0));
}' unless defined(&TPARM_5);
eval 'sub TPARM_4 {
my($a,$b,$c,$d,$e) = @_;
eval q( &TPARM_5($a,$b,$c,$d,$e,0));
}' unless defined(&TPARM_4);
eval 'sub TPARM_3 {
my($a,$b,$c,$d) = @_;
eval q( &TPARM_4($a,$b,$c,$d,0));
}' unless defined(&TPARM_3);
eval 'sub TPARM_2 {
my($a,$b,$c) = @_;
eval q( &TPARM_3($a,$b,$c,0));
}' unless defined(&TPARM_2);
eval 'sub TPARM_1 {
my($a,$b) = @_;
eval q( &TPARM_2($a,$b,0));
}' unless defined(&TPARM_1);
eval 'sub TPARM_1 {
my($a,$b) = @_;
eval q( &TPARM_2($a,$b,0));
}' unless defined(&TPARM_1);
eval 'sub TPARM_0 {
my($a) = @_;
eval q( &TPARM_1($a,0));
}' unless defined(&TPARM_0);
}
1;