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 WLCreateMark(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,
        { /* read the contents of the ReturnPacket[] */ }
        { /* the head of the incoming expression is not ReturnPacket */ }