Go to the first, previous, next, last section, table of contents.

デフォルト引数値

関数の引数に対するデフォルト値は、引数リスト内に代入文を置くことで、指定 することができます。デフォルト値としては、数値か文字列を指定することがで きます。デフォルトは、引数リストの右側の引数から順にしか指定できません。

rpcb_gettime() に対する XSUB にデフォルトの host 値を持てる ようにするには、XSUB への引数を並べ替えるとよいでしょう。その XSUB が、 本当の rpcb_gettime() 関数を正しい引数順序で呼ぶことになります。 Perl から、この XSUB を呼ぶときには、次のどちらの形式でも使えることにな ります。 

$status = rpcb_gettime( $timep, $host );

$status = rpcb_gettime( $timep );

XSUB は次のようなものになるでしょう。 CODE: ブロックが、本当の rpcb_gettime() 関数を、正しい順序の引数で呼び出すために使われます。 

bool_t
rpcb_gettime(timep,host="localhost")
     char *  host
     time_t  timep = NO_INIT
     CODE:
          RETVAL = rpcb_gettime( host, &timep );
     OUTPUT:
     timep
     RETVAL

Go to the first, previous, next, last section, table of contents.

検索式: