Go to the documentation of this file.
233 #ifndef __OPENFLUID_TOOLS_FORTRANCPP_HPP__
234 #define __OPENFLUID_TOOLS_FORTRANCPP_HPP__
238 # define BEGIN_EXTERN_FORTRAN \
241 # define END_EXTERN_FORTRAN }
243 # define BEGIN_EXTERN_FORTRAN
244 # define END_EXTERN_FORTRAN
257 #define EXTERN_FFUNCTION(x) x##_
263 #define CALL_FFUNCTION(x) x##_
269 #define EXTERN_FSUBROUTINE(x) void x##_
275 #define CALL_FSUBROUTINE(x) x##_
287 #define EXTERN_FMODFUNCTION(x,y) __##x##_MOD_##y
294 #define CALL_FMODFUNCTION(x,y) __##x##_MOD_##y
301 #define EXTERN_FMODSUBROUTINE(x,y) void __##x##_MOD_##y
308 #define CALL_FMODSUBROUTINE(x,y) __##x##_MOD_##y
325 #define FREAL8 double
327 #define FREAL16 long double
337 #define FINT2 short int
342 #define FINT8 long int
345 #define FLOGICAL1 bool
354 #define FCHARACTER char
356 #define FSTRING char*
357 #define FSTRINGLEN int
366 #define STD2FSTRING(str) strdup((str).c_str())
367 #define STD2FSTRINGLEN(str) strlen((str).c_str())
368 #define STD2FSTRINGFULL(str) strdup((str).c_str()),strlen((str).c_str())