C 语言和 Fortran 混编不是那么简单的。
根据你的代码,我写了一个接口:
[Fortran] 纯文本查看 复制代码 Module Intf
Implicit None
Interface
Subroutine PUSHCHARACTERARRAY( a , b )
!DEC$ ATTRIBUTES DEFAULT, C , ALIAS:'_pushcharacterarray_' :: pushcharacterarray
Integer :: a , b
End Subroutine
End Interface
End Module Intf
把这个接口添加在 adBuffer.f 文件的开头。然后在 SUBROUTINE PUSHCHARACTER(x) 下方加上:Use Intf
这样就可以找到 PUSHCHARACTERARRAY 这个函数了。
其他函数请依样画葫芦。 |