WSTestUCS2HeadWithArgCount （C 関数）

int WSTestUCS2HeadWithArgCount(WSLINK l, const unsigned short *s, int v, int *n)

l が指定するWSTP接続から読み込まれる次のオブジェクトが，頭部 s を持つ式，つまりUCS-2でコード化された長さ v の文字列であり，式の引数の数が n であることを検証する．

詳細

  • WSTestUCS2HeadWithArgCount()は，リンク上の現行の式が頭部としての記号を持つ関数ではない場合，記号名が s, とマッチしない場合，あるいは関数の引数の数が n ではない場合には失敗する．
  • WSTestUCS2HeadWithArgCount()は，関数が結果を返す際に，関数に対する引数の実際の数を n に保存する．
  • WSTestUCS2HeadWithArgCount()は，エラーが起った場合には0を，関数が成功した場合には非零の値を返す．
  • WSTestUCS2HeadWithArgCount()が失敗した場合には，WSError()を使ってエラーコードを得るとよい．
  • WSTestUCS2HeadWithArgCount()は，関数が失敗した場合には，WSTestUCS2HeadWithArgCount()を呼び出す直前のリンク上の式に対するストリームポインタを再設定する．この操作は，プログラマがWSCreateMark(l); WSTestUCS2HeadWithArgCount(...); WSSeekToMark(...)を呼び出したかのように振舞う．
  • WSTestUCS2HeadWithArgCount()は，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)
{
    unsigned short symbol[4];
    int args = 2;
    const char *symbol;

    symbol[0] = 'P';
    symbol[1] = 'l';
    symbol[2] = 'u';
    symbol[3] = 's';

    if(! WSTestUCS2HeadWithArgCount(l, (const unsigned short *)symbol, 4, &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);
}