8.224 SIGNAL — Обработка сигналов (подпрограмма или функция)

Описание:

SIGNAL(NUMBER, HANDLER [, STATUS]) вызывает внешнюю подпрограмму HANDLER с целым аргументом при возникновении сигнала NUMBER. Если HANDLER является целым числом, то это может быть использовано для отключения обработки сигнала NUMBER или возврата к его поведению по умолчанию. Смотрите signal(2).

Если SIGNAL вызывается как подпрограмма и аргумент STATUS задан, то он устанавливается в значение, возвращаемое signal(2).

Стандарт:

Расширение GNU

Класс:

Подпрограмма, функция

Синтаксис:

CALL SIGNAL(NUMBER, HANDLER [, STATUS])

STATUS = SIGNAL(NUMBER, HANDLER)

Аргументы:

NUMBER	Должно быть скалярным целым числом, с INTENT(IN)
HANDLER	Обработчик сигнала (INTEGER FUNCTION или SUBROUTINE) или псевдо-глобальный INTEGER скаляр. INTEGER. Это INTENT(IN).
STATUS	(Необязательно) STATUS должен быть скалярным целым числом. Он имеет INTENT(OUT).

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

Функция SIGNAL возвращает значение, возвращённое signal(2).

Пример:

program test_signal
  intrinsic signal
  external handler_print

  call signal (12, handler_print)
  call signal (10, 1)

  call sleep (30)
end program test_signal