Re: [TCLCORE] Tcl/Tk 8.6.14 RC2 macOS 14.3.1 Sonoma on M2

[Alexander S. <a.s...@gm...>]

Tk 8.6.14rc2 OK

all.tcl: Total 9706 Passed 8499 Skipped 1207 Failed 0
all.tcl: Total 499 Passed 484 Skipped 15 Failed 0
all.tcl: Total 9706 Passed 8499 Skipped 1207 Failed 0
all.tcl: Total 499 Passed 484 Skipped 15 Failed 0

> Am 27.02.2024 um 08:53 schrieb Alexander Schöpe <a.s...@gm...>:
> 
> Tcl 8.6.14rc1
> all.tcl:        Total   47015   Passed  43841   Skipped 3174    Failed  0
> all.tcl:        Total   792     Passed  726     Skipped 66      Failed  0
> all.tcl:        Total   1       Passed  1       Skipped 0       Failed  0
> all.tcl:        Total   13      Passed  13      Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   4       Passed  3       Skipped 1       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   161     Passed  158     Skipped 3       Failed  0
> all.tcl:        Total   138     Passed  122     Skipped 16      Failed  0
> all.tcl:        Total   47015   Passed  43841   Skipped 3174    Failed  0
> all.tcl:        Total   792     Passed  726     Skipped 66      Failed  0
> all.tcl:        Total   1       Passed  1       Skipped 0       Failed  0
> all.tcl:        Total   13      Passed  13      Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   4       Passed  3       Skipped 1       Failed  0
> all.tcl:        Total   0       Passed  0       Skipped 0       Failed  0
> all.tcl:        Total   161     Passed  158     Skipped 3       Failed  0
> all.tcl:        Total   138     Passed  122     Skipped 16      Failed  0
> 
> Tk 8.6.14rc1
> ==== wm-maxsize-1.7 maxsize must be <= screen size FAILED
> ==== Contents of test case:
>    toplevel .t
>    lassign [wm maxsize .t] t_width t_height
>    set s_width [winfo screenwidth .t]
>    set s_height [winfo screenheight .t]
>    expr {($t_width <= $s_width) && ($t_height <= $s_height)}
> ---- Result was:
> 0
> ---- Result should have been (exact matching):
> 1
> ==== wm-maxsize-1.7 FAILED
> all.tcl:        Total   9706    Passed  8498    Skipped 1207    Failed  1
> all.tcl:        Total   499     Passed  484     Skipped 15      Failed  0
> ==== focus-1.12 Tk_FocusCmd procedure, -displayof option FAILED
> ==== Contents of test case:
>    focusClear
>    focus .t
>    focus -displayof .t.b3
> ---- Result was:
> .t
> ---- Result should have been (exact matching):
> ==== focus-1.12 FAILED
> ==== wm-maxsize-1.7 maxsize must be <= screen size FAILED
> ==== Contents of test case:
>    toplevel .t
>    lassign [wm maxsize .t] t_width t_height
>    set s_width [winfo screenwidth .t]
>    set s_height [winfo screenheight .t]
>    expr {($t_width <= $s_width) && ($t_height <= $s_height)}
> ---- Result was:
> 0
> ---- Result should have been (exact matching):
> 1
> ==== wm-maxsize-1.7 FAILED
> all.tcl:        Total   9706    Passed  8497    Skipped 1207    Failed  2
> all.tcl:        Total   499     Passed  484     Skipped 15      Failed  0