9.185 MALLOC — Выделить динамическую память

Описание:

MALLOC(SIZE) выделяет SIZE байт динамической памяти и возвращает адрес выделенной памяти. Встроенная функция MALLOC — расширение, предназначенное для использования с указателями Cray, и предоставлена в GNU Fortran для компиляции старого кода. Для нового кода, использующего указатели Fortran 95, используется встроенная функция выделения памяти ALLOCATE.

Стандарт:

Расширение GNU

Класс:

Функция

Синтаксис:

PTR = MALLOC(SIZE)

Аргументы:

SIZE	Тип должен быть INTEGER.

Возвращаемое значение:

Возвращаемое значение имеет тип INTEGER(K), с K таким, что переменные типа INTEGER(K) имеют тот же размер, что и указатели C (sizeof(void *)).

Пример:

Следующий пример демонстрирует использование MALLOC и FREE с указателями Cray.

program test_malloc
  implicit none
  integer i
  real*8 x(*), z
  pointer(ptr_x,x)

  ptr_x = malloc(20*8)
  do i = 1, 20
    x(i) = sqrt(1.0d0 / i)
  end do
  z = 0
  do i = 1, 20
    z = z + x(i)
    print *, z
  end do
  call free(ptr_x)
end program test_malloc

См. также:

FREE