5.1.32 Расширенные спецификаторы ввода/вывода

GNU Fortran поддерживает дополнительные устаревшие спецификаторы ввода/вывода CARRIAGECONTROL, READONLY, и SHARE с флагом компиляции -fdec для совместимости.

CARRIAGECONTROL

Спецификатор CARRIAGECONTROL позволяет пользователю управлять настройками завершения строки между записями вывода для устройства ввода/вывода. Спецификатор не имеет значения для файлов только для чтения. При открытии устройства для форматированного записи, указание CARRAIGECONTROL определяет, какие символы будут записаны между записями вывода. Синтаксис:

OPEN(..., CARRIAGECONTROL=cc)

Где cc — это символьное выражение, которое вычисляется как одно из следующих значений:

'LIST'	Одна переводная строка между записями (по умолчанию)
'FORTRAN'	Устаревшая интерпретация первого символа (см. ниже)
'NONE'	Разделитель между записями отсутствует

С CARRIAGECONTROL='FORTRAN', при записи записи, первый символ входной записи не записывается, а вместо этого определяет разделитель вывода как следует:

Ведущая буква	Значение	Символ(ы) разделения вывода
'+'	Перепечатка	Только возврат каретки
'-'	Новая строка	Перевод строки и возврат каретки
'0'	Пропустить строку	Две переводные строки и возврат каретки
'1'	Новая страница	Форматный символ и возврат каретки
'$'	Запрос	Перевод строки (без возврата каретки)
CHAR(0)	Перепечатка (без продвижения)	Отсутствует

READONLY

Спецификатор READONLY может быть задан при открытии устройства и эквивалентен указанию ACTION='READ', за исключением того, что файл не может быть удален при закрытии (т.е. CLOSE с STATUS="DELETE"). Синтаксис:

OPEN(..., READONLY)

SHARE

Спецификатор SHARE позволяет осуществлять блокировку на уровне системы для устройства при его открытии для контролируемого доступа из нескольких процессов/потоков. Спецификатор SHARE имеет несколько форм:

OPEN(..., SHARE=sh)
OPEN(..., SHARED)
OPEN(..., NOSHARED)

Где sh в первой форме — это символьное выражение, которое вычисляется как значение, представленное в таблице ниже. Последние две формы являются псевдонимами для определенных значений sh:

Явное выражение	Сокращенная форма	Значение
SHARE='DENYRW'	NOSHARED	Эксклюзивная (запись) блокировка
SHARE='DENYNONE'	SHARED	Общие (чтение) блокировка

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

Поведение блокировки может варьироваться в зависимости от вашей операционной системы. В системах POSIX блокировка реализуется с помощью fcntl. Обратитесь к руководству вашей операционной системы для получения дополнительных деталей. Блокировка посредством SHARE= не поддерживается в других системах.