主题:我在编译一个动态链接库时给出了这样的错误
我在编译一个动态链接库时给出了这样的错误,请哪位朋友帮忙看看问题出在哪里。
这个问题困扰了好几天了,非常感谢!
the an error LNK2019, imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代码如下:
module MM
!DEC$ OBJCOMMENT LIB:'libiomp5md.lib'
include 'link_fnl_static_hpc.h'
USE numerical_libraries
real:: A(2),B(2), INV(2,2)
END MODULE MM
!
!
MODULE FF
INTERFACE
subroutine Dis
Use MM
end subroutine Dis
END INTERFACE
END MODULE FF
!
!
subroutine MainSub(AA,BB)
!dec$ attributes dllexport :: MainSub
Use MM
use FF
real:: AA(2),BB(2)
A=AA
B=BB
call Dis
end subroutine MainSub
!
!
subroutine Dis
Use MM
implicit none
real :: C
INV=reshape((/1.0,0.0,0.0,2.0/),(/2,2/))
C=BLINF(2, 2, INV, 2,A, B)
print*,C
end subroutine Dis
这个问题困扰了好几天了,非常感谢!
the an error LNK2019, imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
error LNK2019: imsls_err.lib(flexlm.obj)
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
代码如下:
module MM
!DEC$ OBJCOMMENT LIB:'libiomp5md.lib'
include 'link_fnl_static_hpc.h'
USE numerical_libraries
real:: A(2),B(2), INV(2,2)
END MODULE MM
!
!
MODULE FF
INTERFACE
subroutine Dis
Use MM
end subroutine Dis
END INTERFACE
END MODULE FF
!
!
subroutine MainSub(AA,BB)
!dec$ attributes dllexport :: MainSub
Use MM
use FF
real:: AA(2),BB(2)
A=AA
B=BB
call Dis
end subroutine MainSub
!
!
subroutine Dis
Use MM
implicit none
real :: C
INV=reshape((/1.0,0.0,0.0,2.0/),(/2,2/))
C=BLINF(2, 2, INV, 2,A, B)
print*,C
end subroutine Dis