test overflow with 10^4000 only if number of digits does match

Author: Expander

test/test_Li2.cpp

@@ -452,13 +452,15 @@ TEST_CASE("test_overflow")
 #endif
    }
 
-   const Data<long double> data128[] = {
-      {{1e4000L, 1.0L}, {-4.241518159395905038804045816392180824073e7L, 28935.13764966185924996018620104716451L}, eps128}
-   };
-
-   for (const auto& d : data128) {
-      CHECK_CLOSE_COMPLEX(Li2(d.z), d.li_expected, d.eps);
-      CHECK_CLOSE_COMPLEX(poly_Li2(d.z), d.li_expected, d.eps);
+   if (std::numeric_limits<long double>::max_exponent10 >= 4000) {
+      const Data<long double> data128[] = {
+         {{1e4000L, 1.0L}, {-4.241518159395905038804045816392180824073e7L, 28935.13764966185924996018620104716451L}, eps128}
+      };
+
+      for (const auto& d : data128) {
+         CHECK_CLOSE_COMPLEX(Li2(d.z), d.li_expected, d.eps);
+         CHECK_CLOSE_COMPLEX(poly_Li2(d.z), d.li_expected, d.eps);
+      }
    }
 }
 

test/test_Li3.cpp

@@ -231,13 +231,15 @@ TEST_CASE("test_overflow")
 #endif
    }
 
-   const Data<long double> data128[] = {
-      {{1e4000L, 1.0L}, {-1.3021939960597718633480560501920418668419e11L, 1.3325123323168432929414697360944689612e8L}, eps128}
-   };
-
-   for (const auto& d : data128) {
-      CHECK_CLOSE_COMPLEX(Li3(d.z), d.li_expected, d.eps);
-      CHECK_CLOSE_COMPLEX(poly_Li3(d.z), d.li_expected, d.eps);
+   if (std::numeric_limits<long double>::max_exponent10 >= 4000) {
+      const Data<long double> data128[] = {
+         {{1e4000L, 1.0L}, {-1.3021939960597718633480560501920418668419e11L, 1.3325123323168432929414697360944689612e8L}, eps128}
+      };
+
+      for (const auto& d : data128) {
+         CHECK_CLOSE_COMPLEX(Li3(d.z), d.li_expected, d.eps);
+         CHECK_CLOSE_COMPLEX(poly_Li3(d.z), d.li_expected, d.eps);
+      }
    }
 }
 

test/test_Li4.cpp

@@ -166,13 +166,15 @@ TEST_CASE("test_overflow")
 #endif
    }
 
-   const Data<long double> data128[] = {
-      {{1e4000L, 1.0L}, {-2.998411785811730437806291599010045237778e14L, 4.090964043497988426223363565328465514e11L}, eps128}
-   };
-
-   for (const auto& d : data128) {
-      CHECK_CLOSE_COMPLEX(Li4(d.z), d.li_expected, d.eps);
-      CHECK_CLOSE_COMPLEX(poly_Li4(d.z), d.li_expected, d.eps);
+   if (std::numeric_limits<long double>::max_exponent10 >= 4000) {
+      const Data<long double> data128[] = {
+         {{1e4000L, 1.0L}, {-2.998411785811730437806291599010045237778e14L, 4.090964043497988426223363565328465514e11L}, eps128}
+      };
+
+      for (const auto& d : data128) {
+         CHECK_CLOSE_COMPLEX(Li4(d.z), d.li_expected, d.eps);
+         CHECK_CLOSE_COMPLEX(poly_Li4(d.z), d.li_expected, d.eps);
+      }
    }
 }
 

test/test_Li5.cpp

@@ -145,13 +145,15 @@ TEST_CASE("test_overflow")
 #endif
    }
 
-   const Data<long double> data128[] = {
-      {{1e4000L, 1.0L}, {-5.523276910915025884712078063195501148879e17L, 9.419792822533112833122424859594537172e14L}, eps128}
-   };
-
-   for (const auto& d : data128) {
-      CHECK_CLOSE_COMPLEX(Li5(d.z), d.li_expected, d.eps);
-      CHECK_CLOSE_COMPLEX(poly_Li5(d.z), d.li_expected, d.eps);
+   if (std::numeric_limits<long double>::max_exponent10 >= 4000) {
+      const Data<long double> data128[] = {
+         {{1e4000L, 1.0L}, {-5.523276910915025884712078063195501148879e17L, 9.419792822533112833122424859594537172e14L}, eps128}
+      };
+
+      for (const auto& d : data128) {
+         CHECK_CLOSE_COMPLEX(Li5(d.z), d.li_expected, d.eps);
+         CHECK_CLOSE_COMPLEX(poly_Li5(d.z), d.li_expected, d.eps);
+      }
    }
 }
 

test/test_Li6.cpp

@@ -145,13 +145,15 @@ TEST_CASE("test_overflow")
 #endif
    }
 
-   const Data<long double> data128[] = {
-      {{1e4000L, 1.0L}, {-8.478540098238822566033321355282680660651e20L, 1.7351899625805641348387419061716509476e18L}, eps128}
-   };
-
-   for (const auto& d : data128) {
-      CHECK_CLOSE_COMPLEX(Li6(d.z), d.li_expected, d.eps);
-      CHECK_CLOSE_COMPLEX(poly_Li6(d.z), d.li_expected, d.eps);
+   if (std::numeric_limits<long double>::max_exponent10 >= 4000) {
+      const Data<long double> data128[] = {
+         {{1e4000L, 1.0L}, {-8.478540098238822566033321355282680660651e20L, 1.7351899625805641348387419061716509476e18L}, eps128}
+      };
+
+      for (const auto& d : data128) {
+         CHECK_CLOSE_COMPLEX(Li6(d.z), d.li_expected, d.eps);
+         CHECK_CLOSE_COMPLEX(poly_Li6(d.z), d.li_expected, d.eps);
+      }
    }
 }