[sisyphus] Сборка FORTRAN-программ

Andrey Liakhovets liakh на dol.ru
Пн Июн 27 09:27:46 UTC 2011


On Mon, 27 Jun 2011 13:11:52 +0400 Sergei Epiphanov wrote:
>В сообщении от 27 июня 2011 11:38:35 автор vx8400 написал:
>> DO 1 I=1,400 ?
>
>В том-то и дело, что I=400 и всё...
>
>> 'DO I=400' gfortran 4.4.5 съедает, цикл прокручивается 1 раз,
>> write(*,*) I печатает 0.
>
>Есть ещё особенность:
>
>Если этот цикл написать в виде
>        PROGRAM test
>        INTEGER(4) I
>        DO I=400
>        WRITE(*,*)I
>        END DO
>        END PROGRAM
>
>То компилятор ругается на неожиданное появление строки END DO: "Expecting END 
>PROGRAM statement"

Предположительно, компилятор молча игнорирует некорректный "DO I=400",
после чего "END DO" он действительно не ожидает :)

Андрей Ляховец


Подробная информация о списке рассылки Sisyphus