diff options
| author | Franz Zotter <fzotter@users.sourceforge.net> | 2011-01-25 08:41:50 +0000 |
|---|---|---|
| committer | Franz Zotter <fzotter@users.sourceforge.net> | 2011-01-25 08:41:50 +0000 |
| commit | e4039220d7b88135122090d65af45aaae03fc185 (patch) | |
| tree | 0c5a1416676eae6e2f54633011c7516507ad9534 | |
| parent | 687858d14314136c0e6397b091b0c7d47f5f391d (diff) | |
trying to fix build problems with Bessel function "jnf" from math.h (not all versions have it)
svn path=/trunk/externals/iem/iemmatrix/; revision=14824
| -rw-r--r-- | src/configure.ac | 3 | ||||
| -rw-r--r-- | src/mtx_bessel.c | 6 |
2 files changed, 9 insertions, 0 deletions
diff --git a/src/configure.ac b/src/configure.ac index e78e9b2..0861866 100644 --- a/src/configure.ac +++ b/src/configure.ac @@ -74,6 +74,9 @@ AC_CHECK_LIB([gslcblas], [cblas_dgemm]) AC_CHECK_LIB([gsl], [gsl_blas_dgemm]) AC_CHECK_LIB([gsl], [gsl_eigen_nonsymm],AC_DEFINE(HAVE_GSL_EIGEN_NONSYMM,1,[can gsl compute complex eigenvalues?])) +dnl for math.h Bessel/Neumann functions +AC_CHECK_LIB([math], [jnf],AC_DEFINE(HAVE_MATH_BESSEL,1,[can math compute Bessel functions?])) + if test "x$with_pd" != "x"; then if test -d "${with_pd}/src"; then diff --git a/src/mtx_bessel.c b/src/mtx_bessel.c index 77ac9ea..f17342f 100644 --- a/src/mtx_bessel.c +++ b/src/mtx_bessel.c @@ -121,6 +121,8 @@ static void mTXBesselMatrix (MTXBessel *x, t_symbol *s, int n,m,ofs; +#ifdef HAVE_MATH_BESSEL + /* size check */ if (!size) post("mtx_bessel: invalid dimensions"); @@ -165,6 +167,10 @@ static void mTXBesselMatrix (MTXBessel *x, t_symbol *s, mTXBesselBang(x); } + +#else + post("mtx_bessel: implementation requires math.h that implements jnf and ynf Bessel functions"); +#endif } void mtx_bessel_setup (void) |