Go to the documentation of this file. 31 #ifndef REMORA_KERNELS_LAPACK_FORTRAN_H 32 #define REMORA_KERNELS_LAPACK_FORTRAN_H 34 #if defined(BIND_FORTRAN_LOWERCASE_UNDERSCORE) || defined(BIND_FORTRAN_LOWERCASE) 41 #if defined(__GNUC__) || defined(__ICC) || defined(__sgi) || defined(__COMO__) || defined(__KCC) 42 #define BIND_FORTRAN_LOWERCASE_UNDERSCORE 43 #elif defined(__IBMCPP__) || defined(_MSC_VER) 44 #define BIND_FORTRAN_LOWERCASE 46 #error do not know how to link with fortran for the given platform 53 #if defined(BIND_FORTRAN_LOWERCASE_UNDERSCORE) 54 #define FORTRAN_ID( id ) id##_ 55 #elif defined(BIND_FORTRAN_LOWERCASE) 56 #define FORTRAN_ID( id ) id 58 #error do not know how to bind to fortran calling convention