arch-msx/msxbuild
2
0
Fork 0
Code Issues Pull requests 3 Actions Activity

Errata: sometimes "err_boot" does not get canceled sometimes...
All checks were successful
Run test asserts / Test-Asserts (push) Successful in -12s
Details

Browse source
This commit is contained in:
Willem Cazander 2024-07-13 14:04:30 +02:00
parent 5ac8c10b24
commit 9ee68c414a
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lib/openmsx/share/scripts/fail_after.tcl
View file

@ -40,7 +40,10 @@ proc fail_after { timeout {time_unit "time"} {fail_id "fail_after"} {fail_code 2
global fail_after_prev_id global fail_after_prev_id
set msg "" set msg ""
if {$fail_after_prev_timer != 0} { if {$fail_after_prev_timer != 0} {
after cancel $fail_after_prev_timer if {[catch {after cancel $fail_after_prev_timer} err_msg]} {
puts stderr "error: $err_msg"
fail_after_exit fail_after_cancel_error 1
}
set msg "mb::fail canceled $fail_after_prev_id" set msg "mb::fail canceled $fail_after_prev_id"
} }
set fail_after_prev_id $fail_id set fail_after_prev_id $fail_id