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

This commit is contained in:
Willem Cazander 2024-07-13 14:04:30 +02:00
parent 5ac8c10b24
commit 9ee68c414a

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
set msg ""
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 fail_after_prev_id $fail_id