gcc — неопределенная ссылка на функцию Fortran в переполнении стека

Я не могу понять, почему это не работает.

/* main.cpp */
#include <stdio.h>
extern "C"{
int __stdcall inhalf(int *);
}
int main()
{
int toHalf = 2;
int halved = inhalf(&toHalf);
printf("Half of 2 is %d", halved);
return 0;
}

Хорошо, это выглядит хорошо.

$ g++ -c main.cpp

Нет ошибок

! functions.f90
function inhalf(i) result(j)
integer, intent(in) :: i
integer             :: j
j = i/2
end function inhalf

Я уверен, что это правильно.

$ gfortran -c functions.f90

Все идет нормально…

$ gcc -o testo main.o functions.o
main.o:main.cpp:(.text+0x24): undefined reference to `inhalf@4'
collect2.exe: error: ld returned 1 exit status

Я искал это больше часа, но я не мог найти ничего, что сработало бы для этого случая. Как мне решить это?

1

Решение

Для полной совместимости с C вы можете использовать bind Особенность современного Фортрана:

! functions.f90
function inhalf(i) result(j) bind(C,name='inhalf')
integer, intent(in) :: i
integer             :: j
j = i/2
end function inhalf

Это позволяет вам дать имя функции, которую вы можете использовать в C (и других), не полагаясь на схему именования, которую ваш компилятор использует самостоятельно.

__stdcall только для Win32 (и поведение по умолчанию для связывания см. Вот). Вы можете безопасно удалить его. [На самом деле это требуется для компиляции вашего кода в Linux. ]

0

Другие решения

Других решений пока нет …

По вопросам рекламы ammmcru@yandex.ru