@@ -70,7 +70,7 @@ endfunction () | |||
# @param replace_last_with replaces the last character in the filename with this string (e.g. symm_k should be symm_TU) | |||
# @param append_with appends the filename with this string (e.g. trmm_R should be trmm_RTUU or some other combination of characters) | |||
# @param no_float_type turns off the float type define for this build (e.g. SINGLE/DOUBLE/etc) | |||
# @param complex_only/real_only some routines have separate source files for complex and non-complex float types. | |||
# @param complex_filename_scheme some routines have separate source files for complex and non-complex float types. | |||
# 0 - compiles for all types | |||
# 1 - compiles the sources for non-complex types only (SINGLE/DOUBLE) | |||
# 2 - compiles for complex types only (COMPLEX/DOUBLE COMPLEX) | |||
@@ -88,7 +88,7 @@ function(GenerateNamedObjects sources_in) | |||
if (DEFINED ARGV3) | |||
set(use_cblas ${ARGV3}) | |||
else () | |||
set(use_cblas 0) | |||
set(use_cblas false) | |||
endif () | |||
if (DEFINED ARGV4) | |||
@@ -108,7 +108,7 @@ function(GenerateNamedObjects sources_in) | |||
set(real_only false) | |||
set(complex_only false) | |||
set(mangle_complex_sources false) | |||
if (DEFINED ARGV7) | |||
if (DEFINED ARGV7 AND NOT "${ARGV7}" STREQUAL "") | |||
if (${ARGV7} EQUAL 1) | |||
set(real_only true) | |||
elseif (${ARGV7} EQUAL 2) | |||
@@ -204,6 +204,7 @@ endfunction () | |||
# If 4, it will insert the code before the last underscore. E.g. trtri_U_parallel with TRANS will be trtri_UT_parallel | |||
# @param alternate_name replaces the source name as the object name (define codes are still appended) | |||
# @param no_float_type turns off the float type define for this build (e.g. SINGLE/DOUBLE/etc) | |||
# @param complex_filename_scheme see GenerateNamedObjects | |||
function(GenerateCombinationObjects sources_in defines_in absent_codes_in all_defines_in replace_scheme) | |||
if (DEFINED ARGV5) | |||
@@ -214,6 +215,10 @@ function(GenerateCombinationObjects sources_in defines_in absent_codes_in all_de | |||
set(no_float_type ${ARGV6}) | |||
endif () | |||
if (DEFINED ARGV7) | |||
set(complex_filename_scheme ${ARGV7}) | |||
endif () | |||
AllCombinations("${defines_in}" "${absent_codes_in}") | |||
set(define_combos ${LIST_OUT}) | |||
set(define_codes ${CODES_OUT}) | |||
@@ -271,7 +276,7 @@ function(GenerateCombinationObjects sources_in defines_in absent_codes_in all_de | |||
endif () | |||
endif () | |||
GenerateNamedObjects("${source_file}" "${cur_defines}" "${alternate_name}" 0 "${replace_code}" "${append_code}" "${no_float_type}") | |||
GenerateNamedObjects("${source_file}" "${cur_defines}" "${alternate_name}" 0 "${replace_code}" "${append_code}" "${no_float_type}" "${complex_filename_scheme}") | |||
list(APPEND COMBO_OBJ_LIST_OUT "${OBJ_LIST_OUT}") | |||
endforeach () | |||
endforeach () | |||
@@ -31,6 +31,7 @@ set(BLAS2_SOURCES | |||
tpsv.c tpmv.c | |||
) | |||
# these do not have separate 'z' sources | |||
set(BLAS3_SOURCES | |||
gemm.c symm.c | |||
trsm.c syrk.c syr2k.c | |||
@@ -53,12 +54,19 @@ endif () | |||
foreach (CBLAS_FLAG ${CBLAS_FLAGS}) | |||
GenerateNamedObjects("${BLAS1_SOURCES}" "" "" ${CBLAS_FLAG}) | |||
GenerateNamedObjects("${BLAS1_REAL_ONLY_SOURCES}" "" "" ${CBLAS_FLAG} "" "" 0 1) | |||
GenerateNamedObjects("${BLAS1_MANGLED_SOURCES}" "" "" ${CBLAS_FLAG} "" "" 0 3) | |||
GenerateNamedObjects("${BLAS2_SOURCES}" "" "" ${CBLAS_FLAG} "" "" 0 3) | |||
GenerateNamedObjects("${BLAS3_SOURCES}" "" "" ${CBLAS_FLAG}) | |||
GenerateNamedObjects("${BLAS3_MANGLED_SOURCES}" "" "" ${CBLAS_FLAG} "" "" 0 3) | |||
# TODO: don't compile complex sources with cblas for now, the naming schemes are all different and they will have to be handled separately from SINGLE/DOUBLE | |||
set(DISABLE_COMPLEX 0) | |||
set(MANGLE_COMPLEX 3) | |||
if (CBLAS_FLAG EQUAL 1) | |||
set(DISABLE_COMPLEX 1) | |||
set(MANGLE_COMPLEX 1) | |||
endif () | |||
GenerateNamedObjects("${BLAS1_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false ${DISABLE_COMPLEX}) | |||
GenerateNamedObjects("${BLAS1_REAL_ONLY_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false 1) | |||
GenerateNamedObjects("${BLAS1_MANGLED_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false ${MANGLE_COMPLEX}) | |||
GenerateNamedObjects("${BLAS2_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false ${MANGLE_COMPLEX}) | |||
GenerateNamedObjects("${BLAS3_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false ${DISABLE_COMPLEX}) | |||
GenerateNamedObjects("${BLAS3_MANGLED_SOURCES}" "" "" ${CBLAS_FLAG} "" "" false ${MANGLE_COMPLEX}) | |||
# trmm is trsm with a compiler flag set | |||
GenerateNamedObjects("trsm.c" "TRMM" "trmm" ${CBLAS_FLAG}) | |||
@@ -3,29 +3,36 @@ include_directories(${CMAKE_SOURCE_DIR}) | |||
set(LAPACK_SOURCES | |||
getf2/getf2_k.c | |||
getrf/getrf_single.c | |||
potrf/potrf_U_single.c | |||
potrf/potrf_L_single.c | |||
potf2/potf2_U.c | |||
potf2/potf2_L.c | |||
lauu2/lauu2_U.c | |||
lauu2/lauu2_L.c | |||
lauum/lauum_U_single.c | |||
lauum/lauum_L_single.c | |||
) | |||
# add a 'z' to filename for complex version | |||
set(LAPACK_MANGLED_SOURCES | |||
getf2/getf2_k.c | |||
lauu2/lauu2_U.c | |||
lauu2/lauu2_L.c | |||
potf2/potf2_U.c | |||
potf2/potf2_L.c | |||
) | |||
# sources that need TRANS set | |||
# this has a 'z' version | |||
set(TRANS_SOURCES | |||
getrs/getrs_single.c | |||
) | |||
# sources that need UNIT set | |||
# these do NOT have a z version | |||
set(UNIT_SOURCES | |||
trtri/trtri_U_single.c | |||
trtri/trtri_L_single.c | |||
) | |||
# these have a 'z' version | |||
set(UNIT_SOURCES2 | |||
trti2/trti2_U.c | |||
trti2/trti2_L.c | |||
@@ -51,6 +58,7 @@ set(ZLAPACK_SOURCES | |||
) | |||
GenerateNamedObjects("${LAPACK_SOURCES}") | |||
GenerateNamedObjects("${LAPACK_MANGLED_SOURCES}" "" "" 0 "" "" "" 3) | |||
# TODO: laswp needs arch specific code | |||
GenerateNamedObjects("laswp/generic/laswp_k.c" "" "laswp_plus") | |||
@@ -64,40 +72,32 @@ if (SMP) | |||
set(GETRF_SRC getrf/getrf_parallel.c) | |||
endif () | |||
# these do not have 'z' versions | |||
set(PARALLEL_SOURCES | |||
${GETRF_SRC} | |||
potrf/potrf_U_parallel.c | |||
potrf/potrf_L_parallel.c | |||
lauum/lauum_U_parallel.c | |||
lauum/lauum_L_parallel.c | |||
potrf/potrf_U_parallel.c | |||
potrf/potrf_L_parallel.c | |||
) | |||
# this has a z version | |||
list(APPEND TRANS_SOURCES | |||
getrs/getrs_parallel.c | |||
) | |||
# these do NOT have a z version | |||
list(APPEND UNIT_SOURCES | |||
trtri/trtri_U_parallel.c | |||
trtri/trtri_L_parallel.c | |||
) | |||
set(ZPARALLEL_SOURCES | |||
${GETRF_SRC} | |||
getrs/zgetrs_parallel.c | |||
potrf/potrf_U_parallel.c | |||
potrf/potrf_L_parallel.c | |||
lauum/lauum_U_parallel.c | |||
lauum/lauum_L_parallel.c | |||
trtri/trtri_U_parallel.c | |||
trtri/trtri_L_parallel.c | |||
) | |||
GenerateNamedObjects("${PARALLEL_SOURCES}") | |||
endif () | |||
GenerateCombinationObjects("${TRANS_SOURCES}" "TRANS" "N" "" 4) | |||
GenerateCombinationObjects("${TRANS_SOURCES}" "TRANS" "N" "" 4 "" "" 3) | |||
GenerateCombinationObjects("${UNIT_SOURCES}" "UNIT" "N" "" 4) | |||
GenerateCombinationObjects("${UNIT_SOURCES2}" "UNIT" "N" "" 0) | |||
GenerateCombinationObjects("${UNIT_SOURCES2}" "UNIT" "N" "" 0 "" "" 3) | |||
set(DBLAS_OBJS ${DBLAS_OBJS} PARENT_SCOPE) # list append removes the scope from DBLAS_OBJS | |||