Spec-Zone.ru › GNU Fortran 11

7.1.3 Переменные глобального доступа

Переменные могут быть доступны из C с помощью атрибута привязки C, необязательно вместе с указанием имени привязки. Эти переменные должны быть объявлены в части объявления MODULE, быть типа глобального доступа и не иметь атрибута pointer и атрибута allocatable.

MODULE m
  USE myType_module
  USE ISO_C_BINDING
  integer(C_INT), bind(C, name="_MyProject_flags") :: global_flag
  type(myType), bind(C) :: tp
END MODULE

Здесь, _MyProject_flags — это чувствительное к регистру имя переменной, видимое из программ C, а global_flag — имя, нечувствительное к регистру, видимое из Fortran. Если имя привязки не указано, как для tp, имя привязки C совпадает с (нижним регистром) именем привязки Fortran. Если имя привязки указано, после двойного двоеточия может быть только одна переменная. Внимание: Вы не можете использовать глобальную переменную для доступа к errno библиотеки C, так как стандарт C допускает её использование как макрос. Используйте вместо этого внутреннюю функцию IERRNO (расширение GNU).

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-11.1.0/gfortran/Interoperable-Global-Variables.html

Spec-Zone.ru

Настройки Оффлайн Что нового Помощь О нас
Spec-Zone .ru
спецификации, руководства, описания, API