WSTestHeadWithArgCount （C 関数）

int WSTestHeadWithArgCount(WSLINK l, const char *s, int *n)

l が指定するWSTP接続から読み込まれる次のオブジェクトが，頭部 s を持つ式であり，式の引数の数が n であることを検証する．

詳細

  • WSTestHeadWithArgCount()は，リンク上の現行の式が頭部としての記号を持つ関数ではない場合，記号名が s, とマッチしない場合，あるいは関数の引数の数が n ではない場合には失敗する．
  • WSTestHeadWithArgCount()は，関数が結果を返す際に，関数に対する引数の実際の数を n に保存する．
  • WSTestHeadWithArgCount()は，エラーが起った場合には0を，関数が成功した場合には非零の値を返す．
  • WSTestHeadWithArgCount()が失敗した場合には，WSError()を使ってエラーコードを得るとよい．
  • WSTestHeadWithArgCount()は，関数が失敗した場合には，WSTestHeadWithArgCount()を呼び出す直前のリンク上の式に対するストリームポインタを再設定する．この操作は，プログラマがWSCreateMark(l); WSTestHeadWithArgCount(...); WSSeekToMark(...)を呼び出したかのように振舞う．
  • WSTestHeadWithArgCount()は，WSTPヘッダファイルwstp.hの中で宣言される．

例題

例  (1)

#include "wstp.h"

/* A function to test whether the next expression on the Link is Plus[a,b] */

void f(WSLINK l)
{
    int args = 2;
    const char *symbol;

    if(! WSTestHeadWithArgCount(l, "Plus", &args))
    { /* Next expression is not Plus, or does not have two args */ }

    if(! WSGetSymbol(l, &symbol))
    { /* Unable to read symbol */ }

    /* Check if symbol is 'a' */

    WSReleaseSymbol(l, symbol);

    if(! WSGetSymbol(l, &symbol))
    { /* Unable to read symbol */ }

    /* Check if the symbol is 'b' */

    WSReleaseSymbol(l, symbol);
}