next up previous contents
След.: Конструкция ASSOCIATE Выше: Операторы управления ходом программы Пред.: Упражнение   Содержание


Блоки кода

В Фортране стандарта Fortran-2008 введена конструкция BLOCK, представляющая собой блок кода, который может содержать объявления данных. Он позволяет вводить данные там, где они необходимы, причем в собственной области видимости. Синтаксис конструкции:

[имя:]BLOCK

объявления данных

операторы

END BLOCK [имя]

Объявленные в блоке переменные не существуют вне его и не влияют на одноименные переменные вне блока:

N = 1

BLOCK

INTEGER N

N = 2

END BLOCK

! Здесь N по-прежнему равно 1

Вот пример из [14]:

IF (swapxy) THEN

BLOCK

REAL tmp

tmp = x

x = y

y = tmp

END BLOCK

END IF

В блоке могут быть автоматические массивы (§11.2).



Ilya A. Chernov 2012-12-19
X