WSTestUTF8Head （C 函数）

int WSTestUTF8Head(WSLINK l, const unsigned char *h, int v, int *n)

检验将要从 l 读取的下一个表达式是否为一个标头为 h 的表达式，一个长度为 v 的 UTF-8 编码名称，并将表达式参数的数量储存在 n 中.

更多信息

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

范例

基本范例  (1)

#include "wstp.h"

/* A function for testing whether the next expression on the link is a ReturnPacket[] */

void f(WSLINK l)
{
    const unsigned char packet[12];
    int arguments;

    packet[0] =  'R';
    packet[1] =  'e';
    packet[2] =  't';
    packet[3] =  'u';
    packet[4] =  'r';
    packet[5] =  'n';
    packet[6] =  'P';
    packet[7] =  'a';
    packet[8] =  'c';
    packet[9] =  'k';
    packet[10] = 'e';
    packet[11] = 't';

    if(! WSTestUTF8Head(l, (const unsigned short *)packet, 12,
        &arguments))
    { /* read the contents of the ReturnPacket[] */ }
    else
    { /* the head of the incoming expression is not ReturnPacket */ }
}