[Boost-commit] svn:boost r58495 - in sandbox/numeric_bindings: boost/numeric/bindings/lapack/driver libs/numeric/bindings/lapack/test

Subject: [Boost-commit] svn:boost r58495 - in sandbox/numeric_bindings: boost/numeric/bindings/lapack/driver libs/numeric/bindings/lapack/test
From: thomas.klimpel_at_[hidden]
Date: 2009-12-22 14:04:00

Author: klimpel
Date: 2009-12-22 14:03:59 EST (Tue, 22 Dec 2009)
New Revision: 58495
URL: http://svn.boost.org/trac/boost/changeset/58495

Log:
Tested updated lapack regression test on ubuntu 9.10 -> fixed bugs found by gcc

Text files modified: 
   sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp    |     3 +++                                     
   sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp    |     3 +++                                     
   sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/ublas_gees.cpp |    11 +++++++++--                             
   3 files changed, 15 insertions(+), 2 deletions(-)

Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp	(original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/hpsv.hpp	2009-12-22 14:03:59 EST (Tue, 22 Dec 2009)
@@ -22,6 +22,9 @@
 #include <boost/static_assert.hpp>
 #include <boost/type_traits/is_same.hpp>
 
+// high-level solve typedefs and functions
+#include <boost/numeric/bindings/traits/detail/array_impl.hpp>
+
 namespace boost {
 namespace numeric {
 namespace bindings {

Modified: sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp
==============================================================================
--- sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp	(original)
+++ sandbox/numeric_bindings/boost/numeric/bindings/lapack/driver/spsv.hpp	2009-12-22 14:03:59 EST (Tue, 22 Dec 2009)
@@ -22,6 +22,9 @@
 #include <boost/static_assert.hpp>
 #include <boost/type_traits/is_same.hpp>
 
+// high-level solve typedefs and functions
+#include <boost/numeric/bindings/traits/detail/array_impl.hpp>
+
 namespace boost {
 namespace numeric {
 namespace bindings {

Modified: sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/ublas_gees.cpp
==============================================================================
--- sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/ublas_gees.cpp	(original)
+++ sandbox/numeric_bindings/libs/numeric/bindings/lapack/test/ublas_gees.cpp	2009-12-22 14:03:59 EST (Tue, 22 Dec 2009)
@@ -33,11 +33,12 @@
     typedef typename traits::matrix_traits< MatrixA >::value_type value_type;
     traits::detail::array<value_type> wr(traits::vector_size(w));
     traits::detail::array<value_type> wi(traits::vector_size(w));
-    return lapack::gees_2( jobvs, sort, select, a, sdim, wr, wi, vs, work );
+    integer_t info = lapack::gees_2( jobvs, sort, select, a, sdim, wr, wi, vs, work );
     traits::detail::interlace(traits::vector_storage(wr),
                               traits::vector_storage(wr)+traits::vector_size(w),
                               traits::vector_storage(wi),
                               traits::vector_storage(w));
+    return info;
   }
 };
 
@@ -168,12 +169,18 @@
 
 int main() {
    // Run tests for different value_types
+   std::cout << "float\n" ;
    if (do_value_type<float>()) return 255;
+
+   std::cout << "double\n" ;
    if (do_value_type<double>()) return 255;
+
+   std::cout << "complex<float>\n" ;
    if (do_value_type< std::complex<float> >()) return 255;
+
+   std::cout << "complex<double>\n" ;
    if (do_value_type< std::complex<double> >()) return 255;
 
    std::cout << "Regression test succeeded\n" ;
    return 0;
 }
-