MLPutUCS2Function （C 関数）

MLPutUCS2FunctionはWSPutUCS2Functionに置き換えられた．

int MLPutUCS2Function(( MLINK l , const unsigned short * s , int v , int n )

長さ v の名前 s を持つUCS2でコード化された記号によって与えられる頭部と，n 個の引数を持つ関数を，l で指定されたMathLink接続に置く．

詳細

  • MLPutUCS2Function()への呼出しの後，その他のMathLink関数はその関数の引数を送信するために呼び出されなければならない．
  • MLPutUCS2Function()は，エラーが起った場合には0を，関数が成功した場合には非零の値を返す．
  • MLPutUCS2Function()が失敗した場合には，MLError()を使ってエラーコードを得るとよい．
  • MLPutUCS2Function()は，MathLinkヘッダファイルmathlink.hで宣言される．

例題

例  (1)

#include "mathlink.h"

/* A function to put a List[1,2,3] to the link */

void f(MLINK l)
{
    unsigned short name[4];

    name[0] = 'L';
    name[1] = 'i';
    name[2] = 's';
    name[3] = 't';

    if(! MLPutUCS2Function(l, (unsigned short *)name, 4, 3))
    { /* Unable to put the function to the link */ }

    if(! MLPutInteger8(l, 1))
    { /* Unable to put 1 to the link */ }

    if(! MLPutInteger8(l, 2))
    { /* Unable to put 2 to the link */ }

    if(! MLPutInteger8(l, 3))
    { /* Unable to put 3 to the link */ }

    if(! MLEndPacket(l))
    { /* Unable to send the end-of-packet sequence to the link */ }

    if(! MLFlush(l))
    { /* Unable to flush any buffered output data in the link */ }
}