Вызвать код C / C ++ из программы fortran в Visual Studio? (Как скомпилировать смешанный код C и fortran в Visual Studio)

Есть новый способ сделать это, который имеет много преимуществ - использовать привязку Fortran 2003 ISO C. Это стандартный и поэтому в значительной степени независимый от ОС и языка способ взаимодействия Fortran и C (и любого языка, который будет использовать соглашения о вызовах C). Intel Fortran 11 поддерживает множество других компиляторов - не уверен насчет версии 10. Используя привязку ISO C, вы можете сопоставить любое имя C (в любом случае), не беспокоиться о подчеркивании (и различиях между компиляторами) и можете укажите типы и методы вызова (по ссылке, по значению) для аргументов. Intel предоставляет несколько примеров в папке со своим компилятором; есть также примеры в руководстве по gfortran и обсуждение дополнительных соображений для Windows. Здесь и на форуме Intel Fortran есть предыдущие вопросы и ответы.

Я интегрировал C и Fortran около 20 лет назад и поддерживал эту интеграцию до 5 лет назад. Я использовал следующие приемы:

• Я заметил, что компилятор Fortran помещает все символы в верхний регистр, поэтому убедитесь, что ваши функции C / C ++ также написаны в верхнем регистре. Чтобы проверить, как символы помещаются в файл .OBJ, используйте DUMPBIN.
• Компилятор Fortran не понимает изменения имен, выполняемого компилятором C ++. Скомпилируйте все свои функции C ++, используя соглашение стиля C (используя extern "C")
• Аргументы в Фортране всегда помещаются в стек с использованием ссылок / указателей. Поэтому используйте аргументы-указатели в своей функции C.

Честно говоря, я отказался от интеграции C и Fortran, когда перешел на VS2005, так что с тех пор все могло измениться. Тем не менее, по-прежнему рекомендуется использовать DUMPBIN, чтобы увидеть, какие символы создает компилятор Fortran, и настроить компиляцию исходных текстов C / C ++ в соответствии с этим.

Мы делаем это там, где я работаю.

Предполагая, что вы используете компилятор Intel Fortran, посмотрите его документацию. По умолчанию Intel Fortran передает все по ссылке и (я полагаю) использует соглашение о вызовах C с идентификатором, состоящим только из заглавных букв. Строки представляют собой особую проблему, поскольку Фортран любит передавать длину в качестве скрытого параметра с настройкой компилятора для того, где она находится в списке параметров.

Мудрый программист не полагается на значения по умолчанию (где ошибка может привести к неопределенному поведению) и будет использовать операторы intel INTERFACE для указания соглашения о вызовах, передачи параметров и имени ссылки для подпрограммы. Информация на на этой странице ATTRIBUTES Properties и Calling Conventions) обязательно к прочтению. В частности, вам это нужно, чтобы понять тайные правила того, когда и куда будут передаваться параметры длины строки. У меня есть распечатка, которую я храню при себе. :-)

Еще одна вещь, на которую следует обратить внимание, это то, что версии VisualStudio после 6 не любят смешанные проекты Fortran и C. Мы решили проблему, создав пользовательские файлы проекта, вызывающие makefile, но это PITA. Я бы посоветовал плыть по течению и использовать отдельные проекты, если вы не делаете это часто, как мы.

Найдено решение: ссылка на решение

У меня было несколько проблем со связыванием, которые можно было решить, добавив свойства проекта.

код для тестирования:

#include <stdio.h>

extern "C"
{
    void f() 
    {
        printf("hi from c\n mega test");
    }
}

код Фортрана

PROGRAM HelloWorld
use, intrinsic :: iso_c_binding
implicit none 
interface
    subroutine f( ) bind( c )
        use, intrinsic :: iso_c_binding
    end subroutine f   
end interface  
call f
END PROGRAM HelloWorld

По запросу я могу загрузить тестовый проект. спасибо всем, надеюсь, это была моя последняя проблема с c и fortran

Мне удалось собрать obj из исходников fortran благодаря Custom Build Tools Visual Express 2010. Думаю, это возможно и в Visual Studio.

Если вы хотите смешать C и Fortran вместе, есть хорошее руководство здесь. Он был написан для компиляторов gcc, но вы должны научиться легко справляться с искажением имен.

В зависимости от компилятора скомпилированные подпрограммы / функции имеют верхний / нижний регистр, с завершающим подчеркиванием, с ведущим подчеркиванием, ... Для успешной связи вы можете использовать инструменты dumpbin, чтобы увидеть, как имя отображается в объектном файле.

Другой способ - использовать iso_c_binding модули, но он доступен только в Fortran 2003.

Вот как это работает с gcc и консолью

c.c:

#include <stdio.h>

void f_()
{
    printf("Hi from C\n");
} 

fortran.f90

PROGRAM HelloWorld
   CALL f
END PROGRAM HelloWorld

Makefile

SRCDIR=.

all: clean release run

release:
    gcc -c c.c -o c.out 
    gfortran -c fortran.f90 -o fortran.out
    gfortran -o out.exe fortran.out c.out
run:
    out.exe

clean:
    @$(ZSHMAGIC)  rm -rf *.exe core* *.o a.out 2> /dev/null

Еще один вопрос: всегда ли я добавляю '_' после имени c-функции, которую я использую в программе fortran?