WSTestUCS2HeadWithArgCount （C 函数）

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

检验由 l 指定的 WSTP 连接读取的下一个对象是否为一个标头为 s 的表达式，一个长度为 v 的 UCS-2 编码字符字符串，且表达式参数的数量是否为 n.

更多信息

  • 若链接上的当前表达式并非用符号作为标头，或符号的名称与 s 不相符，或函数参数的数量不是 n，则 WSTestUCS2HeadWithArgCount() 失败.
  • 当函数返回时，则 WSTestUCS2HeadWithArgCount() 会在 n 中储存函数参数的真实数量.
  • 若发生错误，则 WSTestUCS2HeadWithArgCount() 返回0；若函数成功，则返回非零值.
  • 若 WSTestUCS2HeadWithArgCount() 失败，则使用 WSError() 检索错误代码.
  • 若函数失败，则 WSTestUCS2HeadWithArgCount() 会恰好在调用 WSTestUCS2HeadWithArgCount() 之前重置链接上表达式的流指针（stream pointer）. 这个操作表现得就像程序员调用了 WSCreateMark(l); WSTestUCS2HeadWithArgCount(...); WSSeekToMark(...) 一样.
  • WSTP 的标头文件 wstp.h 已对 WSTestUCS2HeadWithArgCount() 作出声明.

范例

基本范例  (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);
}