8.124 GETCWD — Получение текущей рабочей директории

Описание:

Получение текущей рабочей директории.

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

Стандарт:

Расширение GNU

Класс:

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

Синтаксис:

CALL GETCWD(C [, STATUS])

STATUS = GETCWD(C)

Аргументы:

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

Пример:

PROGRAM test_getcwd
  CHARACTER(len=255) :: cwd
  CALL getcwd(cwd)
  WRITE(*,*) TRIM(cwd)
END PROGRAM

См. также:

CHDIR — Изменение рабочей директории

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