From 73314a9703d01624e45087d07afd72f29427bcc6 Mon Sep 17 00:00:00 2001 From: deal Date: Thu, 24 Mar 2005 20:11:28 +0000 Subject: [PATCH] Don't use N and T, but write "N" and "T" directly. git-svn-id: https://svn.dealii.org/trunk@10238 0785d39b-7218-0410-832d-ea1e28bc413d --- deal.II/lac/include/lac/lapack_support.h | 10 +--------- deal.II/lac/source/lapack_full_matrix.cc | 4 ++-- 2 files changed, 3 insertions(+), 11 deletions(-) diff --git a/deal.II/lac/include/lac/lapack_support.h b/deal.II/lac/include/lac/lapack_support.h index 4ff96c3c5d..8b6e17cac8 100644 --- a/deal.II/lac/include/lac/lapack_support.h +++ b/deal.II/lac/include/lac/lapack_support.h @@ -53,15 +53,7 @@ namespace LAPACKSupport /// Matrix is in upper Hessenberg form hessenberg = 8 }; - - /** - * Character constant. - */ - extern const char N = 'N'; - /** - * Character constant. - */ - extern const char T = 'T'; + /** * Integer constant. */ diff --git a/deal.II/lac/source/lapack_full_matrix.cc b/deal.II/lac/source/lapack_full_matrix.cc index 34d900dbd2..e2ff5d0871 100644 --- a/deal.II/lac/source/lapack_full_matrix.cc +++ b/deal.II/lac/source/lapack_full_matrix.cc @@ -92,7 +92,7 @@ LAPACKFullMatrix::vmult ( const number alpha = 1.; const number beta = (adding ? 1. : 0.); - gemv(&N, &mm, &nn, &alpha, data(), &mm, v.val, &one, &beta, w.val, &one); + gemv("N", &mm, &nn, &alpha, data(), &mm, v.val, &one, &beta, w.val, &one); } @@ -108,7 +108,7 @@ LAPACKFullMatrix::Tvmult ( const number alpha = 1.; const number beta = (adding ? 1. : 0.); - gemv(&T, &mm, &nn, &alpha, data(), &mm, v.val, &one, &beta, w.val, &one); + gemv("T", &mm, &nn, &alpha, data(), &mm, v.val, &one, &beta, w.val, &one); } #else -- 2.39.5