2010-03-17 14:00:29 +02:00
|
|
|
PROGRAM CMakeFortranCompilerABI
|
|
|
|
#if 0
|
|
|
|
! Address Size
|
|
|
|
#endif
|
|
|
|
#if defined(_LP64)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
|
|
|
#elif defined(_M_IA64)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
|
|
|
#elif defined(_M_X64)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
|
|
|
#elif defined(_M_AMD64)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
2014-08-03 19:52:23 +02:00
|
|
|
#elif defined(__x86_64__)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
2010-03-17 14:00:29 +02:00
|
|
|
|
|
|
|
#elif defined(_ILP32)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[4]'
|
|
|
|
#elif defined(_M_IX86)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[4]'
|
2014-08-03 19:52:23 +02:00
|
|
|
#elif defined(__i386__)
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[4]'
|
2012-02-18 12:40:36 +02:00
|
|
|
|
|
|
|
#elif defined(__SIZEOF_POINTER__) && __SIZEOF_POINTER__ == 8
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
|
|
|
#elif defined(__SIZEOF_POINTER__) && __SIZEOF_POINTER__ == 4
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[4]'
|
2014-08-03 19:52:23 +02:00
|
|
|
#elif defined(__SIZEOF_SIZE_T__) && __SIZEOF_SIZE_T__ == 8
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[8]'
|
|
|
|
#elif defined(__SIZEOF_SIZE_T__) && __SIZEOF_SIZE_T__ == 4
|
|
|
|
PRINT *, 'INFO:sizeof_dptr[4]'
|
2010-03-17 14:00:29 +02:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#if 0
|
|
|
|
! Application Binary Interface
|
|
|
|
#endif
|
2019-11-11 23:01:05 +01:00
|
|
|
#if defined(__ELF__)
|
2010-03-17 14:00:29 +02:00
|
|
|
PRINT *, 'INFO:abi[ELF]'
|
|
|
|
#endif
|
|
|
|
PRINT *, 'ABI Detection'
|
2009-10-04 10:30:41 +03:00
|
|
|
END
|