7.3.2 _gfortran_set_options — Установка флагов опций библиотеки Fortran

Описание:

_gfortran_set_options устанавливает несколько флагов, связанных со стандартом Fortran, которые следует использовать, нужно ли включить отслеживание ошибок и нужно ли выполнять проверки диапазона. Синтаксис обеспечивает обратную совместимость, так как указывается количество переданных флагов; для непереданных флагов используется значение по умолчанию. См. также Параметры генерации кода. Обратите внимание, что не все флаги фактически используются.

Синтаксис:

void _gfortran_set_options (int num, int options[])

Аргументы:

num	количество переданных опций
argv	Список значений флагов

Список флагов опций:

option[0]	Разрешённый стандарт; может вызвать ошибки во время выполнения, если, например, описатель редактирования ввода-вывода некорректен в заданном стандарте. Возможные значения (с использованием побитового ИЛИ): GFC_STD_F77 (1), GFC_STD_F95_OBS (2), GFC_STD_F95_DEL (4), GFC_STD_F95 (8), GFC_STD_F2003 (16), GFC_STD_GNU (32), GFC_STD_LEGACY (64), GFC_STD_F2008 (128), GFC_STD_F2008_OBS (256) и GFC_STD_F2008_TS (512). Значение по умолчанию: GFC_STD_F95_OBS | GFC_STD_F95_DEL | GFC_STD_F95 | GFC_STD_F2003 | GFC_STD_F2008 | GFC_STD_F2008_TS | GFC_STD_F2008_OBS | GFC_STD_F77 | GFC_STD_GNU | GFC_STD_LEGACY.
option[1]	Флаг предупреждения стандарта; выводит предупреждение в стандартный поток ошибок. Значение по умолчанию: GFC_STD_F95_DEL | GFC_STD_LEGACY.
option[2]	Если не равно нулю, включает педантическую проверку. Значение по умолчанию: выключено.
option[3]	Не используется.
option[4]	Если не равно нулю, включает отслеживание ошибок во время выполнения. Значение по умолчанию: выключено. (По умолчанию в компиляторе: включено.) Примечание: Устанавливает обработчик сигналов и требует инициализации из командной строки с использованием _gfortran_set_args.
option[5]	Если не равно нулю, поддерживает знаки с нулём. Значение по умолчанию: включено.
option[6]	Включает проверку во время выполнения. Возможные значения (с использованием побитового ИЛИ): GFC_RTCHECK_BOUNDS (1), GFC_RTCHECK_ARRAY_TEMPS (2), GFC_RTCHECK_RECURSION (4), GFC_RTCHECK_DO (16), GFC_RTCHECK_POINTER (32). Значение по умолчанию: выключено.
option[7]	Не используется.
option[8]	Выводит предупреждение при вызове STOP и ERROR STOP, если произошла ошибка с плавающей точкой. Возможные значения (с использованием побитового ИЛИ): GFC_FPE_INVALID (1), GFC_FPE_DENORMAL (2), GFC_FPE_ZERO (4), GFC_FPE_OVERFLOW (8), GFC_FPE_UNDERFLOW (16), GFC_FPE_INEXACT (32). Значение по умолчанию: Нет (0). (По умолчанию в компиляторе: GFC_FPE_INVALID | GFC_FPE_DENORMAL | GFC_FPE_ZERO | GFC_FPE_OVERFLOW | GFC_FPE_UNDERFLOW.)

Пример:

/* Use gfortran 4.9 default options.  */
static int options[] = {68, 511, 0, 0, 1, 1, 0, 0, 31};
_gfortran_set_options (9, &options);