8.125 GETENV — Получение переменной окружения

Описание:

Получение значения VALUE переменной окружения NAME.

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

Обратите внимание, что GETENV может не быть потокобезопасной. Пользователь несёт ответственность за обеспечение того, чтобы среда не обновлялась одновременно с вызовом функции GETENV.

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL GETENV(NAME, VALUE)

Аргументы:

`NAME`	Должен быть типа `CHARACTER` и стандартного размера.
`VALUE`	Должен быть типа `CHARACTER` и стандартного размера.

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

Сохраняет значение NAME в VALUE. Если VALUE недостаточно велик для хранения данных, он усекается. Если NAME не установлена, VALUE заполнится пробелами.

Пример:

PROGRAM test_getenv
  CHARACTER(len=255) :: homedir
  CALL getenv("HOME", homedir)
  WRITE (*,*) TRIM(homedir)
END PROGRAM

См. также:

GET_ENVIRONMENT_VARIABLE — Получение переменной окружения

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