6.1.25 Атрибуты AUTOMATIC и STATIC

С -fdec-static GNU Fortran поддерживает расширенные атрибуты DEC STATIC и AUTOMATIC для явного указания хранения сущностей. Они следуют синтаксису атрибута стандарта Fortran SAVE.

STATIC точно эквивалентно SAVE, и указывает, что сущность должна быть размещена в статической памяти. В качестве примера, STATIC локальные переменные сохранят свои значения при многократных вызовах функции.

Сущности, помеченные AUTOMATIC, будут использовать автоматическое стековое хранение, когда это возможно. AUTOMATIC является значением по умолчанию для локальных переменных, меньших -fmax-stack-var-size, если не указано -fno-automatic. Этот атрибут переопределяет -fno-automatic, -fmax-stack-var-size и общие SAVE утверждения.

Примеры:

subroutine f
  integer, automatic :: i  ! automatic variable
  integer x, y             ! static variables
  save
  ...
endsubroutine

subroutine f
  integer a, b, c, x, y, z
  static :: x
  save y
  automatic z, c
  ! a, b, c, and z are automatic
  ! x and y are static
endsubroutine

! Compiled with -fno-automatic
subroutine f
  integer a, b, c, d
  automatic :: a
  ! a is automatic; b, c, and d are static
endsubroutine