check CFI_CDESC_T

Author: scivision

cmake/compilers.cmake

@@ -65,6 +65,16 @@ endif()
 if(HAVE_ISO_FORTRAN_BINDING_H)
   check_symbol_exists(CFI_is_contiguous "ISO_Fortran_binding.h" HAVE_CFI_IS_CONTIGUOUS)
   check_symbol_exists(CFI_setpointer "ISO_Fortran_binding.h" HAVE_CFI_SETPOINTER)
+
+  # some compilers allow using CFI_CDESC_T as a pointer but are missing the properties of it.
+  check_source_compiles(C "#include <ISO_Fortran_binding.h>
+  int main(void){
+  CFI_CDESC_T(1) t;
+  char* s = (char*) t.base_addr;
+  return 0;
+  }"
+  HAVE_CFI_CDESC
+  )
 endif()
 
 endfunction()

test/iso_fortran_binding/CMakeLists.txt

@@ -35,13 +35,15 @@ if(HAVE_C_CHAR_PTR)
   add_executable(cfi_establish_string c_string.f90 c_string.c)
   add_test(NAME CFI_establish_string COMMAND cfi_establish_string)
 
-  add_executable(string_array string_array.cpp string_array.f90)
-  set_property(TARGET string_array PROPERTY LINKER_LANGUAGE CXX)
-  target_compile_options(string_array PRIVATE "$<$<COMPILE_LANG_AND_ID:Fortran,GNU>:-Wno-uninitialized>")
+  if(HAVE_CFI_CDESC)
+    add_executable(string_array string_array.cpp string_array.f90)
+    set_property(TARGET string_array PROPERTY LINKER_LANGUAGE CXX)
+    target_compile_options(string_array PRIVATE "$<$<COMPILE_LANG_AND_ID:Fortran,GNU>:-Wno-uninitialized>")
+
+    add_test(NAME string_array COMMAND string_array)
+    set_property(TEST string_array PROPERTY PASS_REGULAR_EXPRESSION "red[ \n]+green[ \n]+blue")
+  endif()
 
-  add_test(NAME string_array COMMAND string_array)
-  set_property(TEST string_array PROPERTY PASS_REGULAR_EXPRESSION
-"red[ \n]+green[ \n]+blue")
 endif()