Как заставить работать программу на Фортране 77 в Windows 10 x64?

Как заставить работать программу на Фортране 77 в Windows 10 x64 ? Программа отлично работала в ХР. Теперь у меня Windows 10, а среда Microsoft Developer, в которой работал компилятор и сама программа, несовместима с этой ОС. С Visual Studio предлагается Фортран 90, но, во-первых, переписывать всю программу (очень большая!) никому не пожелаю, но, главное, предложенная в качестве теста программка, не прошла отладку.

Код из файла «Помощи» при Silverfrost FTN95:
Результат компиляции:
Build started: Project: Test1, Configuration: Debug .NET ------
Building project Test1...
Updating References...
Linking...

ЌҐ®Ўа Ў®в **®Ґ ЁбЄ«озҐ*ЁҐ: System.TypeInitializationException: €*ЁжЁ «Ё§ в®а вЁЇ "Salford.Linker" ўл¤ « ЁбЄ«озҐ*ЁҐ. ---> System.TypeInitializationException: €*ЁжЁ «Ё§ в®а вЁЇ "Salford.Fortran.RTLibrary" ўл¤ « ЁбЄ«озҐ*ЁҐ. ---> System.TypeInitializationException: €*ЁжЁ «Ё§ в®а вЁЇ "Salford.Fortran.RTLibrary1" ўл¤ « ЁбЄ«озҐ*ЁҐ. ---> System.AccessViolationException: Џ®ЇлвЄ звҐ*Ёп Ё«Ё § ЇЁбЁ ў § йЁйҐ**го Ї ¬пвм. ќв® з бв® бўЁ¤ҐвҐ«мбвўгҐв ® ⮬, зв® ¤агЈ п Ї ¬пвм Ї®ўаҐ¦¤Ґ* .
ў Salford.Fortran.RTLibrary1..cctor()
--- Љ®*Ґж ва ббЁа®ўЄЁ ў*гваҐ**ҐЈ® б⥪ ЁбЄ«озҐ*Ё© ---
ў Salford.Fortran.RTLibrary1.__init_c_io()
ў Salford.Fortran.RTLibrary.InitLibrary()
ў Salford.Fortran.RTLibrary..cctor()
--- Љ®*Ґж ва ббЁа®ўЄЁ ў*гваҐ**ҐЈ® б⥪ ЁбЄ«озҐ*Ё© ---
ў Salford.Fortran.RTLibrary.InitLibrary()
ў Salford.Linker..cctor()
--- Љ®*Ґж ва ббЁа®ўЄЁ ў*гваҐ**ҐЈ® б⥪ ЁбЄ«озҐ*Ё© ---
ў Salford.Linker.Main(String[] args)

Build log saved at: "file://C:\Users\Alexander\Documents\Silverfrost FTN95 Express\Test1\Test1\Debug\NET\buildlog.t xt"
Test1 build failed.
========== Build: 0 succeeded or up-to-date, 1 failed, 0 skipped ==========

Microsoft Delivery Studio несовместим с Windows 10. Visio Studio тоже не работает. Так как же добиться работы программы на Фортране?

0

Не хватает прав на изменение файла или дебагер не выгрузился и занимает его.

Перенеси проект с рабочего стола. Может умная винда запрещает такие фокусы.

Поставил форс с Вашей ссылки- прога собралась и работает (win10pro).

0

Сообщение от Sandro1949 Установил gfortran (http://www.lepsch.com/download... 7Setup.exe). Результат такой: "ld: cannot open output file

Разве это gfortran? Зачем Вам 77-я версия?
Смотрите gfortran здесь, если еще точнее, то здесь (наименование не gfortran т.к. там не только он). gfortran полностью поддерживает стандарт 95-го года и в него добавляются вещи из стандартов 2003/2008. К тому же заодно с Фортраном получите Ada, C, C++, Obj-C.
К сожалению по факту не желания работать устанавливаемых компиляторов не могу подсказать, что то видимо в системе не так. Хоть там с правами и черт ногу сломит, но попробуйте из под админской учетки все сделать (если пробуете не из под нее).

0

Работаю как администратор. Перепробовал несколько вариантов фортрана (Фортран77, который с Microsoft Developer Studio, фортран с Visual Studio, Silverfrost FTN95 и Force2). Общее у них одно - даже если не сообщают об ошибках при компиляции, на выполнение не переходят. При этом только первый Фортран (77) после компиляции выдает "фатальную ошибку С1007" , а после линковки - тоже фатальную ошибку о невозможности найти файл "kernel32.lib", хотя он имеется в папке "LIB". Из приведенного факта одинаковой неспособности 4-х разных "инструментов" справится с простейшей задачей прихожу к выводу о том, что каким-то образом утеряна способность открывать консольное окно. Повторюсь: раньше (в ХР) Фортран 77 с Microsoft Developer работал

Добавлено через 2 минуты
Куда его перенести? Да он у меня и не на столе вовсе

0

0

Sandro1949, Вам для чего это нужно? Именно для винды что-то сделать или ради экспериментов? Если второе, то вариант поставить вируталку с Linux.

0

Сообщение от Sandro1949 C:\Users\Alexander\Desktop\Source1.exe

Вот эта штука явно говорит, что файл с исходником сохранен прямо на рабочий стол.

0

Ошибка - LINK : fatal error LNK1104: cannot open file "kernel32.lib" довольно распространенная, говорит о том, что где то не прописаны пути к библиотекам Windows. Вот посмотрите
https://www.google.ru/search?q... 3&ie=UTF-8

0

Извините, начинается путаница из-за того, что пробую разные версии и с разных расположений.

Добавлено через 4 часа 8 минут
Установил "DLL Suite" для ОС Windows 8 x64 - не делает ничего! Проверена, на других компах в ОС 7 и 10 работает

0

Сообщение от Sandro1949 Permission denied". Что это?

- это "доступ запрещен" (не хватает прав). Рекомендую попробовать выполнить все это от имени админа.

0

Я единственный пользователь своего компа и работаю как администратор

0

Вот здесь предлагаются разные варианты.

0

Скачал как рекомендовано gfortran, установил, проверил "переменные среды" - все на месте. Запускаю из командной строки - всё как предсказано. Пытаюсь запустить компиляцию через "Файл - командная строка" из папки с исходником (с расширением .rtf или .doc) - вот результат:
C:\Users\Alexander Avanov\Documents\Наука\ТКА>gfortran -o most.rtf most.f90
gfortran: error: most.f90: No such file or directory

C:\Users\Alexander Avanov\Documents\Наука\ТКА>

Добавлено через 1 час 26 минут
Скачал как рекомендовано gfortran, установил, проверил "переменные среды" - все на месте. Запускаю из командной строки - всё как предсказано. Пытаюсь запустить компиляцию через "Файл - командная строка" из папки с исходником (с расширением .rtf или .doc) - вот результат:
C:\Users\Alexander Avanov\Documents\Наука\ТКА>gfortran -o most.rtf most.f90
gfortran: error: most.f90: No such file or directory

C:\Users\Alexander Avanov\Documents\Наука\ТКА>

А если заранее вставить в папку ТКА пустой файл most.f90, то результат будет такой:

C:\Users\Alexander Avanov\Documents\Наука\ТКА>gfortran -o most.rtf most.f90
c:/program files (x86)/gfortran/bin/../lib/gcc/mingw32/4.10.0/../../../libmingw32.a(main.o): In function `main':
e:\p\giaw\src\pkg\mingwrt-4.0.3-1-mingw32-src\bld/../mingwrt-4.0.3-1-mingw32-src/src/libcrt/crt/main.c:91: undefined reference to `WinMain@16'
collect2.exe: error: ld returned 1 exit status

C:\Users\Alexander Avanov\Documents\Наука\ТКА>

0

Сообщение от Sandro1949 с расширением .rtf или .doc

- как это понимать? У тебя исходные тексты хранятся в офисном формате?!! Ты жжешь! Неудивительно, что ничего не работает.

0

Именно так работал Microsoft Developer: я копировал текст программы из текстового файла в окно проекта и запускал компилятор - всё прекрасно работало: и отладка и линк и сама программа. А где и как еще хранить текст программы?

0

Ну, вообще-то, исходники обычно хранятся в текстовых файлах с расширением *.for или *.f. Обычно проект включает много файлов.

Добавлено через 3 минуты
В твоем случае расширение должно быть *.f90. Создай текстовый файл, назови его most.f90, запиши в него исходный текст и транслируй.

0

Я же пишу: в MS Developer всё работало без сбоев. Разумеется, компилятор создавал файлы .f (.f90, .for) и в проекте, кроме этих файлов были загрузочные. Но с установкой Windows 10 выяснилось, что Девелопер с ним не совместим. Вот WH и посоветовал скачать gfortran, который тоже не хочет работать (описано ранее)

0

Сообщение от Sandro1949 компилятор создавал файлы .f (.f90, .for)

Не компилятор создает эти файлы. Это файлы с исходным кодом - их создает программист т.е. Вы.
В Вашем MSDS был создан проект и вы в нем меняли содержимое файлов с исходным кодом не важно из какого текстового файла копировалось, главное при сборке проекта оно сохранялось в файле с исходным кодом с верным расширением.

Дерните эти файлы из проекта (или сделайте заново из тех, что с расширением rft/doc) и соберите из командной строки.
Для gfortran команда будет такаяздесь xmain это имя исполняемого файла который будет создан после сборки программы. У него для винды будет расширение exe (писать расширение не нужно), Выше в выводе стоит .rtf отсюда и падение с ошибкой.

И свободный формат (.f90) для 77 стандарта не лучший вариант. При прямом копировании будет куча ошибок. Лучше использовать фиксированный.

1

Вроде бы сделал всё как рекомендовано в последний раз. Результат:


C:\Users\Alexander Avanov\Documents\Наука\ТКА\PROJECTS>gfor tran -o most most.for
most.FOR:10.9:

do Fahrenheit = 30, 220, 10
1
Warning: Deleted feature: Loop variable at (1) must be integer

C:\Users\Alexander Avanov\Documents\Наука\ТКА\PROJECTS>

0

Какого типа переменная Fahrenheit ?
Вообще если в логе ничего больше нет, то все в норме (это только предупреждение компилятора) и должен был собраться исполняемый файл.

0

Фаренгейт никакого отношения к моей программе не имеет и в ней не упоминается ни в каком качестве

0