Spec-Zone.ru › GNU Fortran 4

7.1.2 Типы, полученные из других, и struct

Для совместимости типов, полученных из других, с struct, необходимо использовать атрибут BIND(C) в объявлении типа. Например, следующее объявление типа

USE ISO_C_BINDING
TYPE, BIND(C) :: myType
  INTEGER(C_INT) :: i1, i2
  INTEGER(C_SIGNED_CHAR) :: i3
  REAL(C_DOUBLE) :: d1
  COMPLEX(C_FLOAT_COMPLEX) :: c1
  CHARACTER(KIND=C_CHAR) :: str(5)
END TYPE

соответствует следующему struct объявлению на C

struct {
  int i1, i2;
  /* Note: "char" might be signed or unsigned.  */
  signed char i3;
  double d1;
  float _Complex c1;
  char str[5];
} myType;

Типы, полученные из других, с атрибутом привязки к C не должны иметь атрибут sequence, параметров типа, атрибут extends, ни процедур, связанных с типом. Каждый компонент должен быть типа и рода, совместимого с другими, и не должен иметь атрибутов pointer или allocatable. Названия компонентов не имеют значения для совместимости.

Поскольку прямых эквивалентов в Fortran нет, ни объединения, ни структуры с полями битового размера или членами массива переменной длины не являются совместимыми.

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-4.9.3/gfortran/Derived-Types-and-struct.html

Spec-Zone.ru

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