Предупреждение времени выполнения Fortran: Расширение: $ descriptor

Question

Я использую очень старый код Fortran 77 от стороннего производителя (также очень ошибочный). Я собрал с

FFLAGS=-O0 -Wall -g -fbacktrace -pedantic -Wextra

Я получаю предупреждение в заголовке во время выполнения:

At line <number> of file <namefile>.f (unit=6, file='stdout')
Fortran runtime warning: Extension: $ descriptor

Я хотел бы выяснить, что это значит.

Answer 1

Вы должны всегда показывать номер строки кода в сообщении об ошибке или предупреждении, на которое указывает эта строка.

Роль $ в

write(*,'(a$)') "string"

избегать перехода на следующую строку после печати "строки" на экране.

Однако дескриптор нестандартный, и поэтому компилятор предупреждает вас об этом.

Стандартным способом является использование не опережающего ввода / вывода:

write(*,'(a)', advance="no") "string"