topic Passing string from Visual CPP to Visual Fortran in Intel® Fortran Compiler

Passing string from Visual CPP to Visual Fortran

mch7918 — Thu, 24 May 2012 18:44:18 GMT

Hi,
Can some one tell me how to pass a char array from visual c++ code to a fortran subroutine.

I tried below code, it doesn't work for me..

My CPP code:

extern "C" {void Routine1(char* param1, char* param2);}

Method:
char param1[]="c:/text1.txt";
char param2[]="c:/text2.txt" ;
Routine1(param1,param2);

Fortran Code:
SUBROUTINE Routine1(param1, param2)
!DEC$ ATTRIBUTES DLLEXPORT::Routine1

CHARACTER(100) :: Routine1,Routine2

!Some logic

END

Passing string from Visual CPP to Visual Fortran

TimP — Thu, 24 May 2012 20:15:45 GMT

Unfortunately, you have several options, with more or less system dependence involved. The compiler docs should be your friend. If you don't want to deal with additional hidden length arguments, you can USE iso_c_binding and follow any of the documents about character string/arrays with ISO C interop, even those not specific to Intel Fortran. In this case, the terminating \0 from the C side will appear as a character element ACHAR(0) on the Fortran side.