8.121 GETARG — Получение аргументов командной строки

Описание:

Возвращает POS-ый аргумент, переданный в командной строке при вызове содержащей программы.

Эта встроенная процедура предоставляется для обратной совместимости с GNU Fortran 77. В новом коде программисты должны рассмотреть использование встроенной функции GET_COMMAND_ARGUMENT — Получение аргументов командной строки, определённой стандартом Fortran 2003.

Стандарт:

Расширение GNU

Класс:

Подпрограмма

Синтаксис:

CALL GETARG(POS, VALUE)

Аргументы:

`POS`	Должен быть типа `INTEGER` и не шире, чем стандартный целочисленный тип; `POS` \geq 0
`VALUE`	Должен быть типа `CHARACTER` и стандартного размера.

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

После выполнения GETARG, аргумент VALUE содержит POS-ый аргумент командной строки. Если VALUE не может содержать аргумент, он усекается до размера VALUE. Если в командной строке указано меньше POS аргументов, VALUE заполняется пробелами. Если POS = 0, VALUE устанавливается в имя программы (на системах, поддерживающих эту функцию).

Пример:

PROGRAM test_getarg
  INTEGER :: i
  CHARACTER(len=32) :: arg

  DO i = 1, iargc()
    CALL getarg(i, arg)
    WRITE (*,*) arg
  END DO
END PROGRAM

См. также:

Функция совместимости GNU Fortran 77: IARGC — Получить количество аргументов командной строки Функции и подпрограммы Fortran 2003: GET_COMMAND — Получить всю командную строку, GET_COMMAND_ARGUMENT — Получить аргументы командной строки, COMMAND_ARGUMENT_COUNT — Получить количество аргументов командной строки

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