Renamed test scale-21 to scale-21.1, and added scale-21.2 to test huge values for -from and -to options of the scale widget.

1 files changed, 10 insertions, 1 deletions

diff --git a/tests/scale.test b/tests/scale.test
index 384d117..79524eb 100644
--- a/tests/scale.test
+++ b/tests/scale.test
@@ -1504,7 +1504,7 @@ test scale-20.8 {Bug [2262543fff] - Scale widget unexpectedly fires command call
     destroy .s
 } -result {10 10}
 
-test scale-21 {Bug [55b95f578a] - Associating variable with bignum value with scale crashes it} -setup {
+test scale-21.1 {Bug [55b95f578a] - Associating variable with bignum value with scale crashes it} -setup {
     catch {destroy .s}
 } -body {
     pack [scale .s]
@@ -1514,6 +1514,15 @@ test scale-21 {Bug [55b95f578a] - Associating variable with bignum value with sc
 } -cleanup {
     destroy .s
 } -result {}
+test scale-21.2 {Bug [55b95f578a] again - Bignum value for -from/-to with scale crashes it} -setup {
+    catch {destroy .s}
+} -body {
+    pack [scale .s]
+    # non-regression test for bug [55b95f578a] - shall just not crash
+    .s configure -from -6.8e99 -to 8.8e99
+} -cleanup {
+    destroy .s
+} -result {}
 
 option clear