You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
In the File dbcsr_api_c.F in the subroutine c_free_string the intrinsic subroutine c_f_pointer is called: CALL c_f_pointer(c_string, string). The second argument is declared as CHARACTER(:, kind=c_char), POINTER :: string. The Fortran standard draft ISO/IEC FDIS 1539-1:2018 section 18.2.3.3 states that the second argument of the c_f_pointer "[...]shall not have the deferred type parameter[...]", which is has in this routine.
Edit: The standard gives (in Case iv) an example of how to deal with pointers with deferred type parameters and how to handle them. I will cite it here so there is no need to look it up:
In the File
dbcsr_api_c.F
in the subroutinec_free_string
the intrinsic subroutinec_f_pointer
is called:CALL c_f_pointer(c_string, string)
. The second argument is declared asCHARACTER(:, kind=c_char), POINTER :: string
. The Fortran standard draft ISO/IEC FDIS 1539-1:2018 section 18.2.3.3 states that the second argument of thec_f_pointer
"[...]shall not have the deferred type parameter[...]", which is has in this routine.Edit: The standard gives (in Case iv) an example of how to deal with pointers with deferred type parameters and how to handle them. I will cite it here so there is no need to look it up:
The text was updated successfully, but these errors were encountered: