Mercurial > octave-nkf

comparison acx_blas_f77_func.m4 @ 9541:afbdf01bcacc

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 Tue, 18 Aug 2009 12:11:49 -0400
parents fd13f9f7dbac
children 163e205600a4
comparison
equal deleted inserted replaced
9540:79b5fe2d5646 9541:afbdf01bcacc
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], [