第十一章节Fortran-C的混合语言编程_授课版.ppt

第十一章 Fortran和C的混合语言编程 ;;;;第二节 Fortran与C的函数级调用 ;第二节 Fortran与C的函数级调用 ;第二节 Fortran与C的函数级调用 ;第二节 Fortran与C的函数级调用 ;一.Fortran调用C语言函数 例程调用约定 如果C采用_cdecl方式的调用约定，它对应于Fortran的C约定，C被调用的函数名nAme在其obj文件中保持混合大小写，_nAme的形式出现在obj文件中。Fortran的接口块中必须用如下!MS$ ATTRIBUTES编译伪指令说明： !MS$ ATTRIBUTES C, ALIAS:_nAme:: NAME 对应的C语言源程序中，用如下语句说明函数Sum使用_cdecl属性且用于文件外部： extern int Sum(int *p1, int *p2); 或者 extern int _cdecl Sum(int *p1, int *p2); ;一.Fortran调用C语言函数 例程的调用约定 如果C采用_stdcall方式的调用约定，它对应于Fortran的STDCALL约定，C被调用的函数名nAme在其obj文件中保持混合大小写，以_nAme@n的形式出现在obj文件中。Fortran的接口块用如下!MS$ ATTRIBUTES编译伪指令说明： ： !MS$ ATTRIBUTES STDCALL, ALIAS:_nAme@n:: NAME 对应的C语言源程序中，用如下语句说明函数Sum使用_stdcall约定且用于文件外部： extern int _stdcall Sum(int *p1, int *p2); ;一.Fortran调用C语言函数 参数的调用约定 Fortran缺省参数传递为引用传递，若在外部例程中施加了C或STDCALL调用约定，则缺省的引用传递改为值传递（数组参数除外）。为了消除调用约定对参数传递的影响，可以在外部例程中添加具体的参数传递属性（REFERENCE 或VALUE）声明。 若某形参为值传递，此时使用VALUE 关键字： !MS$ ATTRIBUTES VALUE :: a ！将a定义为值传递方式 若某形参为引用传递，此时可使用REFERENCE关键字（缺省方式）： !MS$ ATTRIBUTES REFERENCE :: a !将a定义为引用传递方式 ;例11-1 FORTRAN调用C的空函数 ;例11-2 FORTRAN调用C的有值函数 ;二.C 调用Fortran语言例程 * 对于C语言，要在源程序中对所调用的Fortran例程使用extern关键字说明该例程来自外部，extern和函数说明中间加上_cdecl或_stdcall说明调用约定的属性。 * 如果Fortran例程使用缺省方式的调用约定（即不加任何说明），它被C调用的函数/例程名在其obj文件中全转化为大写。此时C在声明所调用的Fortran外部例程原型时，无论采用何种调用约定，例程名必须大写。;例11-3 C调用Fortran例程，Fortran使用缺省的调用约定 ;二. C调用Fortran语言例程 如果Fortran例程使用C或STDCALL调用约定，它分别对应于C的_cdecl方式和_stdcall方式。此时Fortran例程中必须通过!MS$ ATTRIBUTES编译伪指令说明C函数的别名，C就可以使用保留混合大小写的方式声明它所要调用的Fortran例程. ;例11-4 C调用Fortran例程，Fortran使用C或STDCALL调用约定 ;第三节 Fortran与C调用对方的动态链接库 ;第三节 Fortran与C调用对方的动态链接库 ;第三节 Fortran与C调用对方的动态链接库 ;第三节 Fortran与C调用对方的动态链接库 ; C调用Fortran DLL;第三节 Fortran与C调用对方的动态链接库 ;第三节 Fortran与C调用对方的动态链接库