diff options
| author | Pjotr Prins | 2025-11-20 11:05:25 +0100 |
|---|---|---|
| committer | Pjotr Prins | 2025-11-20 11:05:25 +0100 |
| commit | 3165580c4038cbf6bcd5798bbf541557581430e2 (patch) | |
| tree | f823b34fe00721a93df3a357a2f90d2e7c77062a | |
| parent | ba46c50ccca9418b37eed68f4bda1d089d82e265 (diff) | |
| download | pangemma-3165580c4038cbf6bcd5798bbf541557581430e2.tar.gz | |
disable segfpe checks because they somehow are not linked in. Maybe re-add later.
| -rw-r--r-- | src/lapack.cpp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lapack.cpp b/src/lapack.cpp index e1a63e1..2d10b18 100644 --- a/src/lapack.cpp +++ b/src/lapack.cpp @@ -196,7 +196,7 @@ void lapack_eigen_symmv(gsl_matrix *A, gsl_vector *eval, gsl_matrix *evec, // disable fast NaN checking for now - dsyevr throws NaN errors, // but fixes them (apparently) - if (is_check_mode()) disable_segfpe(); + // if (is_check_mode()) disable_segfpe(); // DSYEVR - computes selected eigenvalues and, optionally, // eigenvectors of a real symmetric matrix @@ -223,7 +223,7 @@ void lapack_eigen_symmv(gsl_matrix *A, gsl_vector *eval, gsl_matrix *evec, if (INFO != 0) cerr << "ERROR: value of INFO is " << INFO; enforce_msg(INFO == 0, "lapack_eigen_symmv failed"); - if (is_check_mode()) enable_segfpe(); // reinstate fast NaN checking + // if (is_check_mode()) enable_segfpe(); // reinstate fast NaN checking gsl_matrix_transpose(evec); |
