subroutine CFOX_add(real1,real2)
!程序作用是根据传入real1,real2得出和
!参数之间用,隔开
!DEC$ ATTRIBUTES DLLEXPORT ::CFOX_add
!上面的语句是编译功能语句,DLL中可以被外界调用的函数都要写上面的语句,
!声明哪些函数可以被外界访问,不然外界无法访问
implicit none
real::real1,real2,sum1
sum1 = real1+real2
return
end subroutine CFOX_add
!编译成dll gfortran -shared -dll -o fdll.dll fdll.f90
fcode 发表于 2024-5-11 10:40
gfortran -shared -o fdll.dll fdll.f90
也可以,同时编译链接就行了。
fcode 发表于 2024-5-11 11:15
dll 不用注册。
其他语言像常规的dll使用一样就行。没有什么特殊的。
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |