From cd0b433540cf8722be689d96a915e184c9cbb22b Mon Sep 17 00:00:00 2001
From: Christoph Hertzberg <chtz@informatik.uni-bremen.de>
Date: Wed, 16 Jul 2014 15:41:10 +0200
Subject: Regression test for bug #714. Note that the bug only occurs on some
 compilers and is not fixed yet

---
 test/product_large.cpp | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'test/product_large.cpp')

diff --git a/test/product_large.cpp b/test/product_large.cpp
index 03d7bd8ed..11531aa1d 100644
--- a/test/product_large.cpp
+++ b/test/product_large.cpp
@@ -61,4 +61,13 @@ void test_product_large()
     VERIFY_IS_APPROX(r2, (mat1.row(2)*mat2).eval());
   }
 #endif
+
+  // Regression test for bug 714:
+#ifdef EIGEN_HAS_OPENMP
+  std::cout << "Testing omp_set_dynamic(1)\n";
+  omp_set_dynamic(1);
+  for(int i = 0; i < g_repeat; i++) {
+    CALL_SUBTEST_6( product(Matrix<float,Dynamic,Dynamic>(internal::random<int>(1,EIGEN_TEST_MAX_SIZE), internal::random<int>(1,EIGEN_TEST_MAX_SIZE))) );
+  }
+#endif
 }
-- 
cgit v1.2.3