Llamando función / subrutina C en código Fortran
Estoy intentando compilar y vincular un código Fortran llamando a la subrutina c:
Código de Fortran:
program adder
integer a,b
a=1
b=2
call addnums(a,b)
stop
end program
Código C:
void addnums( int* a, int* b )
{
int c = (*a) + (*b); /* convert pointers to values, then add them */
printf("sum of %i and %i is %i\n", (*a), (*b), c );
}
Utilicé los siguientes comandos para compilar y vincular en el entorno de Windows.
ifort -c adder.f
cl -c addnums.c
ifort -o add adder.obj addnums.obj
Obtuve el siguiente error:
Microsoft (R) Incremental Linker Version 8.00.50727.762
Copyright (C) Microsoft Corporation. All rights reserved.
-out:add.exe
-subsystem:console
adder.obj
addnums.obj
adder.obj : error LNK2019: unresolved external symbol ADDNUMS referenced in function MAIN__
add.exe : fatal error LNK1120: 1 unresolved externals
¿Por favor ayúdeme a resolver esta situación? Gracias.