MLTestUTF16Head （C 函数）

MLTestUTF16Head 已经被 WSTestUTF16Head 所取代.

int MLTestUTF16Head(MLINK l, const unsigned short *h, int v, int *n)

tests that the next expression to be read from l is an expression with the head h and a UTF-16 encoded name of length v, and stores the number of arguments of the expression in n.

更多信息

  • MLTestUTF16Head() fails if the current expression on the link is not a function with a symbol as a head, or if the name of the symbol does not match h.
  • MLTestUTF16Head() returns 0 in the event of an error, and a nonzero value if the function succeeds.
  • Use MLError() to retrieve the error code if MLTestUTF16Head() fails.
  • MLTestUTF16Head() will reset the stream pointer to the expression on the link just prior to calling MLTestUTF16Head() if the function fails. This operation behaves as if the programmer called MLCreateMark(l); MLTestUTF16Head(…); MLSeekToMark(…).
  • The UTF-16 encoded head h must include a byte order mark.
  • The length v of the UTF-16 encoded head h must include the byte order mark.
  • MLTestUTF16Head() is declared in the MathLink header file mathlink.h.

范例

基本范例  (1)

#include "mathlink.h"

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

void f(MLINK l)
{
    const unsigned short packet[13];
    int arguments;

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

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