旧的 WOLFRAM 语言MATHLINK C 函数

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

已经被 所取代.

int MLSetYieldFunction(MLINK link,MLYieldFunctionObject yf)
安装由 link 引用的链接的屈服函数 yf.

更多信息更多信息

  • 某些 MathLink API 调用会被阻塞直到数据可被读取或空间可被写入. 如果在阻塞期间,应用程序需要执行其他有用的处理,应用程序可以安装链接的屈服函数(yield function),当被阻塞时,MathLink 会自动调用屈服函数.
  • 备份被封锁的读或写,屈服函数应返回一个非零值.
  • MLSetYieldFunction() 在错误事件中返回0,如果函数成功则返回非零值.
  • 在 Windows,MLYieldFunctionObject 使用 WINAPI 调用规范.
  • 如果 MLSetYieldFunction() 失败,则使用 MLError() 检索错误代码.
  • MLSetYieldFunction()MathLink 标头文件 mathlink.h 中被声明.

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

基本范例  (1)基本范例  (1)

#include "mathlink.h"

#if UNIX_MATHLINK
#    define CALLING_CONVENTION
#elif WINDOWS_MATHLINK
#    define CALLING_CONVENTION WINAPI
#endif

int CALLING_CONVENTION AppYieldFunction(MLINK lp, MLYieldParameters yp)
{
    /* ... */
    return 0;
}

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

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

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

    if(! MLSetYieldFunction(link, AppYieldFunction))
        { /* unable to set the yield function for link */ }

    /* ... */

    MLClose(link);
    MLDeinitialize(env);
    return 0;
}