mirror/eigen
2
0
Fork 0
mirror of https://gitlab.com/libeigen/eigen.git synced 2025-01-30 17:40:05 +08:00
Code Issues Packages Projects Releases Wiki Activity

Use f2c generated code instead of the original fortran code, except for dotc/dotu.

Browse Source
This commit is contained in:
Gael Guennebaud 2014-12-11 17:03:41 +01:00
parent 80cae358b0
commit 56ca44ad1a
1 changed files with 10 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
blas/CMakeLists.txt
View File

@ -14,33 +14,18 @@ endif()
add_custom_target(blas)
set(EigenBlas_SRCS single.cpp double.cpp complex_single.cpp complex_double.cpp xerbla.cpp)
set(EigenBlas_SRCS single.cpp double.cpp complex_single.cpp complex_double.cpp xerbla.cpp
f2c/srotm.c f2c/srotmg.c f2c/drotm.c f2c/drotmg.c
f2c/lsame.c f2c/dspmv.c f2c/ssbmv.c f2c/chbmv.c
f2c/sspmv.c f2c/zhbmv.c f2c/chpmv.c f2c/dsbmv.c
f2c/zhpmv.c f2c/dtbmv.c f2c/stbmv.c f2c/ctbmv.c
f2c/ztbmv.c f2c/d_cnjg.c f2c/r_cnjg.c
)
if(EIGEN_USE_F2C_BLAS)
set(EigenBlas_SRCS ${EigenBlas_SRCS}
f2c/complexdots.c
f2c/srotm.c f2c/srotmg.c f2c/drotm.c f2c/drotmg.c
f2c/lsame.c f2c/dspmv.c f2c/ssbmv.c
f2c/chbmv.c f2c/sspmv.c
f2c/zhbmv.c f2c/chpmv.c f2c/dsbmv.c
f2c/zhpmv.c
f2c/dtbmv.c f2c/stbmv.c f2c/ctbmv.c f2c/ztbmv.c
f2c/d_cnjg.c f2c/r_cnjg.c
)
if (EIGEN_Fortran_COMPILER_WORKS)
set(EigenBlas_SRCS ${EigenBlas_SRCS} fortran/complexdots.f)
else()
if (EIGEN_Fortran_COMPILER_WORKS)
set(EigenBlas_SRCS ${EigenBlas_SRCS}
fortran/complexdots.f
fortran/srotm.f fortran/srotmg.f fortran/drotm.f fortran/drotmg.f
fortran/lsame.f fortran/dspmv.f fortran/ssbmv.f
fortran/chbmv.f fortran/sspmv.f
fortran/zhbmv.f fortran/chpmv.f fortran/dsbmv.f
fortran/zhpmv.f
fortran/dtbmv.f fortran/stbmv.f fortran/ctbmv.f fortran/ztbmv.f
)
else()
message(WARNING " No Fortran compiler has been detected, the blas build will be incomplete. Define EIGEN_USE_F2C_BLAS to build BLAS without Fortran")
endif()
set(EigenBlas_SRCS ${EigenBlas_SRCS} f2c/complexdots.c)
endif()
add_library(eigen_blas_static ${EigenBlas_SRCS})