as / 400:从CL调用C程序

时间:2016-09-01 20:02:25

标签: module call ibm-midrange procedure

as / 400 ILE允许将来自不同语言的过程编译成模块,然后绑定在一起制作单个程序。我试图通过一个包含从我的CL模块调用C函数的模块来实现这一目标。该模块是入口模块。

C模块来源: MYLIB / MYFILE / csource

int getValue(void){
    return 20;
}

CL模块源:mylib / myfile / clsource

pgm
dcl var(&NUM) type(*INT)
callprc prc(getValue) rtnval(&NUM) /* <== Calling C function. */
endpgm

然后我将每个文件编译成自己的模块。

crtcmod module(cmodule) srcfile(myfile) srcmbr(csource)
crtclmod module(clmodule) srcfile(myfile) srcmbr(clsource)

这两个编译,没问题。 只是,当我尝试从这两个模块创建程序时,ILE绑定器抱怨CL源代码中的函数getValue未定义,程序创建失败。

crtpgm pgm(mypgm) module(clmodule cmodule) entmod(clmodule) detail(*basic)

crtpgm给我的错误:

Unresolved references........................: 1

Symbol    Type        Library        Object        Linked        Name
          *MODULE     mylib          clmodule      *YES          getValue

我错过了什么?

1 个答案:

答案 0 :(得分:5)

CL语言不区分大小写...

实际上,CL中的未加引号的字符串是隐含的上层字符串。

但是,C区分大小写。您需要引用程序名称

callprc prc('getValue') rtnval(&NUM)