windows下intel C/Fortran 混合编程

源文件==========================

c_sub.C:

=====================================================

#include <stdio.h>

 

#ifdef _cplusplus

extern "C" void{

#endif

#define add_c ADD_C

extern void _stdcall add_c(int *, int *, int *);

#ifdef _cplusplus

}

#endif

 

void _stdcall add_c(int *i, int *j, int *n)

{

   *n = *i + *j;

}

=====================================================

 

f_main.for:

======================================================

      program main

      implicit real*8(a-h, o-z)

 

      i = 1

      j = 2

      call add_c(i,j,n)

 

      print *,'n ==', n

 

      end

======================================================

 

编译========

icl /c c_sub.C

ifort -o t f_main.for c_sub.obj

 

运行结果=====

t.exe

n ==       3

 

成功！！！！！！！！！！！！！！

！注意：：：C程序的扩展名只能为 “c”  或 “C”，“cpp”编译出错！！！！！切记切记！！！