MLSetMessageHandler （C 関数）

MLSetMessageHandlerはWSSetMessageHandlerに置き換えられた．

int MLSetMessageHandler(MLINK link,MLMessageHandlerObject h)

link のためにh で参照される緊急メッセージハンドラ（処理）関数をインストールする．

詳細

  • MathLink が接続の向こう側から緊急のメッセージを受けると，緊急メッセージハンドラ関数が呼び出される．
  • MLSetMessageHandler() はエラーがあると0を返し, 関数が成功すると0以外の値を返す.
  • MLError()を使うと，MLSetMessageHandler()が不成功の場合にエラーコードを引き出すことができる.
  • MLMessageHandlerObject は，void f(MLINK link,int m1,int m2)の形の関数のポインタである．
  • MLSetMessageHandler()は，MathLinkヘッダファイルmathlink.hの中で宣言される．

例題

例  (1)

#include "mathlink.h"


/* handle three common MathLink urgent messages */

void f(MLINK lp, int msg, int arg)
{
    if(msg == MLInterruptMessage)
        { /* generate an interrupt menu */ }
    else if(msg == MLAbortMessage)
        { /* abort the current operation */ }
    else if(msg == MLTerminateMessage)
        { /* shutdown the program */ }

    /* ... */
}


int main(int argc, char **argv)
{
    MLENV env;
    MLINK link;
    int error;

    env = MLInitialize((char *)0);
    if(env == (MLENV)0)
        { /* unable to initialize MathLink environment */ }

    link = MLOpenArgcArgv(env, argc, argv, &error);
    if(link == (MLINK)0 || error != MLEOK)
        { /* unable to create link */ }

    if(! MLSetMessageHandler(link, (MLMessageHandlerObject)f)
        { /* unable to install message handler for link */ }

    /* ... */

    MLClose(link);
    MLDeinitialize(env);

    return 0;
}