diff options
| -rw-r--r-- | tests/scale.test | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/scale.test b/tests/scale.test index 8c14ed4..384d117 100644 --- a/tests/scale.test +++ b/tests/scale.test @@ -1504,6 +1504,17 @@ 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 { + catch {destroy .s} +} -body { + pack [scale .s] + set foo 5.79e99 + # non-regression test for bug [55b95f578a] - shall just not crash + .s configure -variable foo +} -cleanup { + destroy .s +} -result {} + option clear # cleanup |