旧的 WOLFRAM 语言MATHLINK C 函数

MLSetMessageHandler()
This feature is not supported on the Wolfram Cloud.

已经被 所取代.

int MLSetMessageHandler(MLINK link,MLMessageHandlerObject h)
link 安装由 h 引用的紧急消息处理函数.

更多信息更多信息

  • MathLink 从连接的另一端收到一个紧急消息时会调用紧急消息处理函数.
  • MLSetMessageHandler() 在错误事件中返回0,如果函数成功则返回非零值.
  • 如果 MLSetMessageHandler() 失败,则使用 MLError() 检索错误代码.
  • MLMessageHandlerObject 是形式为 void f(MLINK link,int m1,int m2) 的函数的一个指针.
  • MLSetMessageHandler()MathLink 的标头文件 mathlink.h 中被声明.

范例范例打开所有单元关闭所有单元

基本范例  (1)基本范例  (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;
}