Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Debug statements for send-8.19 |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | simplify_test_file_init_for_singleproc_1 |
| Files: | files | file ages | folders |
| SHA3-256: |
c31f90bb15df731ff7ce0488773112fc |
| User & Date: | erikleunissen 2025-08-14 21:11:47.496 |
Context
|
2025-08-14
| ||
| 21:11 | Debug statements for send-8.19 Leaf check-in: c31f90bb user: erikleunissen tags: simplify_test_file_init_for_singleproc_1 | |
| 15:58 | Complete error details in debug test send-8.18.altsimple check-in: 41bb1cf5 user: erikleunissen tags: simplify_test_file_init_for_singleproc_1 | |
Changes
Changes to tests/send.test.
| ︙ | ︙ | |||
415 416 417 418 419 420 421 422 423 424 425 426 |
"send $app {error bork bork_info bork_code}"} bork_code}
test send-8.19 {Tk_SendCmd, using modal timeouts} {secureserver} {
childTkProcess create
set app [childTkProcess eval {tk appname}]
set x no
set result ""
after 0 {set x yes}
lappend result [send $app {concat x y z}]
lappend result $x
update
childTkProcess exit
lappend result $x
| > | | 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 |
"send $app {error bork bork_info bork_code}"} bork_code}
test send-8.19 {Tk_SendCmd, using modal timeouts} {secureserver} {
childTkProcess create
set app [childTkProcess eval {tk appname}]
set x no
set result ""
after 0 {set x yes}
lappend result [expr {$app in [winfo interps]}]
lappend result [send $app {concat x y z}]
lappend result $x
update
childTkProcess exit
lappend result $x
} {1 {x y z} no yes}
#
# COMMON TEST SETUP
#
tk appname tktest
catch {destroy .f}
|
| ︙ | ︙ |