| Server IP : 176.32.38.42 / Your IP : 216.73.217.104 Web Server : LiteSpeed System : Linux ha006.mymail.zone 4.18.0-553.51.1.lve.1.el8.x86_64 #1 SMP Wed May 14 14:34:57 UTC 2025 x86_64 User : s1225329 ( 1835) PHP Version : 7.4.33 Disable Function : exec,system,passthru,shell_exec,proc_close,proc_open,dl,popen,show_source,posix_kill,posix_mkfifo,posix_getpwuid,posix_setpgid,posix_setsid,posix_setuid,posix_setgid,posix_seteuid,posix_setegid,posix_uname MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : OFF | Pkexec : OFF Directory : /proc/self/root/usr/share/cmake/Modules/ |
Upload File : |
program CMakeFortranCompilerABI implicit none integer :: i(1) = 0 where (i==0) i=1 if (any(i/=1)) stop 1 ! showing Fortran 90 syntax is OK #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]' #elif defined(__x86_64__) PRINT *, 'INFO:sizeof_dptr[8]' #elif defined(_ILP32) PRINT *, 'INFO:sizeof_dptr[4]' #elif defined(_M_IX86) PRINT *, 'INFO:sizeof_dptr[4]' #elif defined(__i386__) PRINT *, 'INFO:sizeof_dptr[4]' #elif defined(__SIZEOF_POINTER__) && __SIZEOF_POINTER__ == 8 PRINT *, 'INFO:sizeof_dptr[8]' #elif defined(__SIZEOF_POINTER__) && __SIZEOF_POINTER__ == 4 PRINT *, 'INFO:sizeof_dptr[4]' #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]' #endif #if 0 ! Application Binary Interface #endif #if defined(__ELF__) PRINT *, 'INFO:abi[ELF]' #endif PRINT *, 'ABI Detection' end program