Mercurial > hg > octave-lyh

comparison acx_blas_f77_func.m4 @ 12066:634697062fe1 release-3-2-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
acx_blas_f77_func.m4 (ACX_BLAS_F77_FUNC): Save and restore LIBS
author John W. Eaton <jwe@octave.org>
date Sun, 23 Aug 2009 11:12:16 +0200
parents fd13f9f7dbac
children 163e205600a4
comparison
equal deleted inserted replaced
12065:899122410ea5 12066:634697062fe1
62 62
63 # F77 call-compatibility checks 63 # F77 call-compatibility checks
64 if test "$cross_compiling" = yes ; then 64 if test "$cross_compiling" = yes ; then
65 ifelse($3, ,$1,$3) 65 ifelse($3, ,$1,$3)
66 elif test x"$acx_blas_ok" = xyes; then 66 elif test x"$acx_blas_ok" = xyes; then
67 save_acx_blas_f77_func_LIBS="$LIBS"
67 LIBS="$BLAS_LIBS $LIBS" 68 LIBS="$BLAS_LIBS $LIBS"
68 AC_LANG_PUSH(Fortran 77) 69 AC_LANG_PUSH(Fortran 77)
69 # LSAME check (LOGICAL return values) 70 # LSAME check (LOGICAL return values)
70 AC_MSG_CHECKING([whether LSAME is called correctly from Fortran]) 71 AC_MSG_CHECKING([whether LSAME is called correctly from Fortran])
71 AC_RUN_IFELSE(AC_LANG_PROGRAM(,[[ 72 AC_RUN_IFELSE(AC_LANG_PROGRAM(,[[
155 $1 156 $1
156 else 157 else
157 acx_blas_f77_func_ok=no; 158 acx_blas_f77_func_ok=no;
158 $2 159 $2
159 fi 160 fi
161 LIBS="$save_acx_blas_f77_func_LIBS"
160 fi 162 fi
161 163
162 ])dnl ACX_BLAS_F77_FUNC 164 ])dnl ACX_BLAS_F77_FUNC
163 165
164 AC_DEFUN([ACX_BLAS_WITH_F77_FUNC], [ 166 AC_DEFUN([ACX_BLAS_WITH_F77_FUNC], [