remedial v2rdm (psi4#1449)

* Update FindTargetOpenMP.cmake * Update qt.h * Update libciomr.h * Update tstart.cc
susilehtola · Jan 7, 2019 · 4df70ed · 4df70ed
1 parent dc75ef8
commit 4df70ed
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 4 deletions.
diff --git a/external/common/lapack/FindTargetOpenMP.cmake b/external/common/lapack/FindTargetOpenMP.cmake
@@ -39,6 +39,7 @@ cmake_policy(SET CMP0057 NEW) # support IN_LISTS
 set(_TargetOpenMP_PN ${PN})
 set(PN TargetOpenMP)
 
+separate_arguments(${PN}_FIND_COMPONENTS)
 if(${PN}_FIND_COMPONENTS)
  set(_${PN}_FIND_LIST ${${PN}_FIND_COMPONENTS})
 else()

diff --git a/psi4/src/psi4/libciomr/libciomr.h b/psi4/src/psi4/libciomr/libciomr.h
@@ -84,8 +84,8 @@ PSI_API void block_to_tri(double *a, double **b, int num_ir, int *num_so, int *i
 PSI_API void tri_to_sq(double *amat, double **bmat, int size);
 
 /* Functions under tstart.c */
-PSI_API void tstart();
-PSI_API void tstop();
+void tstart();
+void tstop();
 
 /* Functions in zero.c */
 PSI_API void zero_arr(double *a, int size);

diff --git a/psi4/src/psi4/libciomr/tstart.cc b/psi4/src/psi4/libciomr/tstart.cc
@@ -64,7 +64,7 @@ double user_stop, sys_stop;
 **
 ** \ingroup CIOMR
 */
-void tstart() {
+void PSI_API tstart() {
  int error;
  char *name;
  struct tms total_tmstime;
@@ -100,7 +100,7 @@ void tstart() {
 **
 ** \ingroup CIOMR
 */
-void tstop() {
+void PSI_API tstop() {
  int error;
  std::time_t total_time;
  std::time_t total_time_overall;

diff --git a/psi4/src/psi4/libqt/qt.h b/psi4/src/psi4/libqt/qt.h
@@ -232,6 +232,7 @@ int C_DGGES(char jobvsl, char jobvsr, char sort, int n, double* a, int lda, doub
 int C_DGGESX(char jobvsl, char jobvsr, char sort, char sense, int n, double* a, int lda, double* b, int ldb, int* sdim,
  double* alphar, double* alphai, double* beta, double* vsl, int ldvsl, double* vsr, int ldvsr,
  double* rconde, double* rcondv, double* work, int lwork, int* iwork, int liwork);
+PSI_API
 int C_DGGEV(char jobvl, char jobvr, int n, double* a, int lda, double* b, int ldb, double* alphar, double* alphai,
  double* beta, double* vl, int ldvl, double* vr, int ldvr, double* work, int lwork);
 int C_DGGEVX(char balanc, char jobvl, char jobvr, char sense, int n, double* a, int lda, double* b, int ldb,