${txt}
\n"; } else { print "No documentation available.
\n"; } } $f=new XML_RPC_Message('system.methodSignature'); $f->addParam(new XML_RPC_Value($mname->scalarval(), "string")); $w=rpc_call($c, $f); if ($w) { print "\n";
if ($w->kindOf()=="array") {
for($j=0; $j<$w->arraysize(); $j++) {
$x=$w->arraymem($j);
$ret=$x->arraymem(0);
print "" . $ret->scalarval() . " " .
$mname->scalarval() ."(";
if ($x->arraysize()>1) {
for($k=1; $k<$x->arraysize(); $k++) {
$y=$x->arraymem($k);
print $y->scalarval();
if ($k<$x->arraysize()-1) {
print ", ";
}
}
}
print ")
\n";
}
} else {
print "Signature unknown\n";
}
print "