Warning: ttkStubInit.c may be out of date.
Developers may want to run "make genstubs" to regenerate.
This warning can be safely ignored, do not report as a bug!
LD_LIBRARY_PATH="`pwd`:/home/francois/Documents/tcltk/fossil/tcl/unix:${LD_LIBRARY_PATH}"; export LD_LIBRARY_PATH; TCL_LIBRARY=/home/francois/Documents/tcltk/fossil/tcl/library; export TCL_LIBRARY; TK_LIBRARY=/home/francois/Documents/tcltk/fossil/tk/library; export TK_LIBRARY; ./tktest /home/francois/Documents/tcltk/fossil/tk/unix/../tests/all.tcl -geometry +0+0 -file bind.test -match \* -verbose be
Tests running in interp:  /home/francois/Documents/tcltk/fossil/tk/unix/tktest
Tests located in:  /home/francois/Documents/tcltk/fossil/tk/tests
Tests running in:  /home/francois/Documents/tcltk/fossil/tk/unix
Temporary files stored in /home/francois/Documents/tcltk/fossil/tk/unix
Test files sourced into current interpreter
Running tests that match:  *
Skipping test files that match:  l.*.test
Only running test files that match:  bind.test
Tests began at Sun Oct 28 21:10:33 CET 2018
bind.test


==== bind-1.6 bind command FAILED
==== Contents of test case:

    frame .t.f
    bind .t.f <Enter> {test script}
    set result [bind .t.f <Enter>]
    bind .t.f <Enter> {}
    list $result [bind .t.f <Enter>]

---- Result was:
{} {}
---- Result should have been (exact matching):
{test script} {}
==== bind-1.6 FAILED



==== bind-1.7 bind command FAILED
==== Contents of test case:

    frame .t.f
    bind .t.f <Enter> {test script}
    bind .t.f <Enter> {+more text}
    bind .t.f <Enter>

---- Result was:

---- Result should have been (exact matching):
test script
more text
==== bind-1.7 FAILED



==== bind-9.2 Tk_DeleteBinding procedure FAILED
==== Contents of test case:

    frame .t.f -class Test -width 150 -height 100
    foreach i {a b c d} {
        bind .t.f $i "binding for $i"
    }
    foreach i {b d a c} {
        bind .t.f $i {}
        lappend result [lsort [bind .t.f]]
    }
    return $result

---- Result was:
{a b c d} {a b c d} {a b c d} {a b d}
---- Result should have been (exact matching):
{a c d} {a c} c {}
==== bind-9.2 FAILED



==== bind-9.3 Tk_DeleteBinding procedure FAILED
==== Contents of test case:

    frame .t.f -class Test -width 150 -height 100
    foreach i {<1> <Meta-1> <Control-1> <Double-Alt-1>} {
        bind .t.f $i "binding for $i"
    }
    foreach i {<Control-1> <Double-Alt-1> <1> <Meta-1>} {
        bind .t.f $i {}
        lappend result [lsort [bind .t.f]]
    }
    return $result

---- Result was:
{<Button-1> <Double-Alt-Button-1> <Meta-Button-1>} {<Button-1> <Double-Alt-Button-1> <Meta-Button-1>} {<Button-1> <Double-Alt-Button-1> <Meta-Button-1>} {<Button-1> <Double-Alt-Button-1> <Meta-Button-1>}
---- Result should have been (exact matching):
{<Button-1> <Double-Alt-Button-1> <Meta-Button-1>} {<Button-1> <Meta-Button-1>} <Meta-Button-1> {}
==== bind-9.3 FAILED



==== bind-13.10 Tk_BindEvent procedure: ignore NotifyInferior FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x Enter%#"
    bind .t.f <Leave> "lappend x Leave%#"
    event generate .t.f <Enter> -serial 100 -detail NotifyAncestor
    event generate .t.f <Enter> -serial 101 -detail NotifyInferior
    event generate .t.f <Leave> -serial 102 -detail NotifyAncestor
    event generate .t.f <Leave> -serial 103 -detail NotifyInferior
    return $x

---- Result was:
Enter100 {.t.f enter frame} {.t.f enter .t} Leave102
---- Result should have been (exact matching):
Enter100 Leave102
==== bind-13.10 FAILED



==== bind-16.1 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x abcd}
    set x none
    event generate .t.f <Enter>
    set x

---- Result was:
abcd {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
abcd
==== bind-16.1 FAILED



==== bind-16.2 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %#}
    set x none
    event generate .t.f <Enter> -serial 1234
    set x

---- Result was:
1234 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1234
==== bind-16.2 FAILED



==== bind-16.6 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyAncestor
    set x

---- Result was:
NotifyAncestor {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyAncestor
==== bind-16.6 FAILED



==== bind-16.7 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyVirtual
    set x

---- Result was:
NotifyVirtual {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyVirtual
==== bind-16.7 FAILED



==== bind-16.8 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyNonlinear
    set x

---- Result was:
NotifyNonlinear {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyNonlinear
==== bind-16.8 FAILED



==== bind-16.9 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyNonlinearVirtual
    set x

---- Result was:
NotifyNonlinearVirtual {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyNonlinearVirtual
==== bind-16.9 FAILED



==== bind-16.10 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyPointer
    set x

---- Result was:
NotifyPointer {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyPointer
==== bind-16.10 FAILED



==== bind-16.11 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyPointerRoot
    set x

---- Result was:
NotifyPointerRoot {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyPointerRoot
==== bind-16.11 FAILED



==== bind-16.12 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %d}
    set x none
    event generate .t.f <Enter> -detail NotifyDetailNone
    set x

---- Result was:
NotifyDetailNone {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyDetailNone
==== bind-16.12 FAILED



==== bind-16.13 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x %f}
    set x none
    event generate .t.f <Enter> -focus 1
    return $x

---- Result was:
1 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1
==== bind-16.13 FAILED



==== bind-16.17 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%m"}
    set x none
    event generate .t.f <Enter> -mode NotifyNormal
    set x

---- Result was:
NotifyNormal {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyNormal
==== bind-16.17 FAILED



==== bind-16.18 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%m"}
    set x none
    event generate .t.f <Enter> -mode NotifyGrab
    set x

---- Result was:
NotifyGrab {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyGrab
==== bind-16.18 FAILED



==== bind-16.19 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%m"}
    set x none
    event generate .t.f <Enter> -mode NotifyUngrab
    set x

---- Result was:
NotifyUngrab {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyUngrab
==== bind-16.19 FAILED



==== bind-16.20 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%m"}
    set x none
    event generate .t.f <Enter> -mode NotifyWhileGrabbed
    set x

---- Result was:
NotifyWhileGrabbed {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyWhileGrabbed
==== bind-16.20 FAILED



==== bind-16.27 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%s"}
    set x none
    event generate .t.f <Enter> -state 0x3ff
    set x

---- Result was:
1023 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1023
==== bind-16.27 FAILED



==== bind-16.34 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%x %y"}
    set x none
    event generate .t.f <Enter> -x 781 -y 632
    set x

---- Result was:
781 632 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
781 632
==== bind-16.34 FAILED



==== bind-16.37 ExpandPercents procedure FAILED
==== Contents of test case:

    bind .t.f <Enter> {set x "%E"}
    set x none
    event generate .t.f <Enter> -sendevent 1
    return $x

---- Result was:
1 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1
==== bind-16.37 FAILED



==== bind-17.9 event command: delete many FAILED
==== Contents of test case:

    event delete <<Paste>>
    event add <<Paste>> <3> <1> <2> t
    event delete <<Paste>> <1> <2>
    lsort [event info <<Paste>>]

---- Result was:
<Button-1> <Button-2> <Button-3> t
---- Result should have been (exact matching):
<Button-3> t
==== bind-17.9 FAILED



==== bind-18.4 CreateVirtualEvent procedure: duplicate physical FAILED
==== Contents of test case:

    event delete <<xyz>>
    event add <<xyz>> <Control-v> 
    event add <<xyz>> <Control-v>
    event info <<xyz>>

---- Result was:
<Control-Key-v> <Control-Key-v>
---- Result should have been (exact matching):
<Control-Key-v>
==== bind-18.4 FAILED



==== bind-19.3 DeleteVirtualEvent procedure: delete 1 FAILED
==== Contents of test case:

    event add <<xyz>> <Control-v>
    event delete <<xyz>> <Control-v>
    event info <<xyz>>

---- Result was:
<Control-Key-v>
---- Result should have been (exact matching):

==== bind-19.3 FAILED



==== bind-22.36 HandleEventGenerate: options <Enter> -detail NotifyVirtual FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %d"
    event generate .t.f <Enter> -detail NotifyVirtual
    return $x

---- Result was:
NotifyVirtual {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyVirtual
==== bind-22.36 FAILED



==== bind-22.39 HandleEventGenerate: options <Enter> -focus 1 FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %f"
    event generate .t.f <Enter> -focus 1
    return $x

---- Result was:
1 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1
==== bind-22.39 FAILED



==== bind-22.52 HandleEventGenerate: options <Enter> -mode NotifyNormal FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %m"
    event generate .t.f <Enter> -mode NotifyNormal
    return $x

---- Result was:
NotifyNormal {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
NotifyNormal
==== bind-22.52 FAILED



==== bind-22.71 HandleEventGenerate: options <Enter> -root .t FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %R"
    event generate .t.f <Enter> -root .t 
    expr {[winfo id .t] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.71 FAILED



==== bind-22.79 HandleEventGenerate: options <Enter> -rootx 2i FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %X"
    event generate .t.f <Enter> -rootx 2i 
    expr {[winfo pixels .t.f 2i] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.79 FAILED



==== bind-22.87 HandleEventGenerate: options <Enter> -rooty 2i FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %Y"
    event generate .t.f <Enter> -rooty 2i 
    expr {[winfo pixels .t.f 2i] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.87 FAILED



==== bind-22.101 HandleEventGenerate: options <Enter> -state 1 FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %s"
    event generate .t.f <Enter> -state 1 
    return $x

---- Result was:
1 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
1
==== bind-22.101 FAILED



==== bind-22.113 HandleEventGenerate: options <Enter> -subwindow .t FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %S"
    event generate .t.f <Enter> -subwindow .t 
    expr {[winfo id .t] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.113 FAILED



==== bind-22.121 HandleEventGenerate: options <Enter> -time 100 FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %t"
    event generate .t.f <Enter> -time 100 
    return $x

---- Result was:
100 {.t.f enter frame} {.t.f enter .t}
---- Result should have been (exact matching):
100
==== bind-22.121 FAILED



==== bind-22.145 HandleEventGenerate: options <Enter> -x 2i FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %x"
    event generate .t.f <Enter> -x 2i 
    expr {[winfo pixels .t.f 2i] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.145 FAILED



==== bind-22.157 HandleEventGenerate: options <Enter> -y 2i FAILED
==== Contents of test case:

    bind .t.f <Enter> "lappend x %y"
    event generate .t.f <Enter> -y 2i 
    expr {[winfo pixels .t.f 2i] eq $x}

---- Result was:
0
---- Result should have been (exact matching):
1
==== bind-22.157 FAILED



==== bind-25.1 ParseEventDescription procedure FAILED
==== Contents of test case:

    bind .t.f a test
    bind .t.f a

---- Result was:

---- Result should have been (exact matching):
test
==== bind-25.1 FAILED



==== bind-26.9 event names: Enter FAILED
==== Contents of test case:

    bind .t.f <Enter> "set x {event Enter}"
    set x xyzzy
    event generate .t.f <Enter>
    list $x [bind .t.f]

---- Result was:
{event Enter {.t.f enter frame} {.t.f enter .t}} <Enter>
---- Result should have been (exact matching):
{event Enter} <Enter>
==== bind-26.9 FAILED


Tests ended at Sun Oct 28 21:10:36 CET 2018
all.tcl:	Total	511	Passed	470	Skipped	3	Failed	38
Sourced 1 Test Files.
Files with failing tests: bind.test
Number of tests skipped for each constraint:
	3	nonPortable
LD_LIBRARY_PATH="`pwd`:/home/francois/Documents/tcltk/fossil/tcl/unix:${LD_LIBRARY_PATH}"; export LD_LIBRARY_PATH; TCL_LIBRARY=/home/francois/Documents/tcltk/fossil/tcl/library; export TCL_LIBRARY; TK_LIBRARY=/home/francois/Documents/tcltk/fossil/tk/library; export TK_LIBRARY; ./tktest /home/francois/Documents/tcltk/fossil/tk/unix/../tests/ttk/all.tcl -geometry +0+0 \
-file bind.test -match \* -verbose be
Tests running in interp:  /home/francois/Documents/tcltk/fossil/tk/unix/tktest
Tests located in:  /home/francois/Documents/tcltk/fossil/tk/tests/ttk
Tests running in:  /home/francois/Documents/tcltk/fossil/tk/unix
Temporary files stored in /home/francois/Documents/tcltk/fossil/tk/unix
Test files sourced into current interpreter
Running tests that match:  *
Skipping test files that match:  l.*.test
Only running test files that match:  bind.test
Tests began at Sun Oct 28 21:10:36 CET 2018
Error:  No test files remain after applying your match and skip patterns!

Tests ended at Sun Oct 28 21:10:36 CET 2018
all.tcl:	Total	0	Passed	0	Skipped	0	Failed	0
Sourced 0 Test Files.