Tk Source Code

Check-in [e7902b5a]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment: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.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | bug-55b95f578a
Files: files | file ages | folders
SHA3-256: e7902b5a290726349d98654255cbd5a1e67a4350cd5731824fae1317514d3d14
User & Date: fvogel 2017-10-07 20:18:19
References
2017-10-07
20:21 Ticket [55b95f57] Associating variable with bignum value with scale crashes it status still Open with 3 other changes artifact: 0aa30faf user: fvogel
Context
2017-10-22
19:34
Fix [55b95f578a]: Associating variable with bignum value with scale crashes it. check-in: 89602398 user: fvogel tags: core-8-6-branch
2017-10-07
20:18
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. Closed-Leaf check-in: e7902b5a user: fvogel tags: bug-55b95f578a
20:08
Fix more issues with sprintf in the scale widget. check-in: 9c78924b user: fvogel tags: bug-55b95f578a
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tests/scale.test.

1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514









1515
1516
1517
1518
1519
1520
1521
    .s set 10
    update  ; # -command callback shall fire
    set res [list [.s get] $commandedVar]
} -cleanup {
    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
cleanupTests







|







>
>
>
>
>
>
>
>
>







1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
    .s set 10
    update  ; # -command callback shall fire
    set res [list [.s get] $commandedVar]
} -cleanup {
    destroy .s
} -result {10 10}

test scale-21.1 {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 {}
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

# cleanup
cleanupTests