8.106 FGET — Чтение одного символа в режиме потока из stdin

Описание:

Читает один символ в режиме потока из stdin, минуя обычный форматированный вывод. Ввод-вывод потоков не должен смешиваться с обычным вводом-выводом записей (форматированным или неформатированным) для одного и того же устройства; результаты могут быть непредсказуемыми.

Этот встроенный модуль доступен как в форме подпрограммы, так и в форме функции; однако только одна форма может быть использована в любом заданном блоке программы.

Обратите внимание, что встроенный модуль FGET предоставляется для обеспечения обратной совместимости с g77. GNU Fortran предоставляет механизм потокового ввода-вывода Fortran 2003. Разработчикам рекомендуется использовать новые возможности потокового ввода-вывода в новых кодах для обеспечения будущей переносимости. См. также Состояние Fortran 2003.

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL FGET(C [, STATUS])

STATUS = FGET(C)

Аргументы:

`C`	Тип должен быть `CHARACTER` и иметь стандартный размер.
`STATUS`	(Необязательно) флаг состояния типа `INTEGER`. Возвращает 0 при успехе, -1 при достижении конца файла и системный положительный код ошибки в противном случае.

Пример:

PROGRAM test_fget
  INTEGER, PARAMETER :: strlen = 100
  INTEGER :: status, i = 1
  CHARACTER(len=strlen) :: str = ""

  WRITE (*,*) 'Enter text:'
  DO
    CALL fget(str(i:i), status)
    if (status /= 0 .OR. i > strlen) exit
    i = i + 1
  END DO
  WRITE (*,*) TRIM(str)
END PROGRAM

См. также:

FGETC — Чтение одного символа в режиме потока, FPUT — Запись одного символа в режиме потока в stdout, FPUTC — Запись одного символа в режиме потока

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/FGET.html