Re: [TCLCORE] Tcl/Tk 8.6.13 Release Candidates

[<apn...@ya...>]

Hi Harald, I'm traveling for couple of weeks with no access to my development system. Will not be able to look at it till I get back. 

Sent from Yahoo Mail on Android 
 
  On Sun, 20 Nov 2022 at 12:23 pm, Harald Oehlmann<har...@el...> wrote:   Am 20.11.2022 um 17:43 schrieb Harald Oehlmann:
> Now available at
> 
> https://sourceforge.net/projects/tcl/files/Tcl/8.6.13/
> 
> are candidate files making up the RC3 pre-releases of Tcl and Tk 8.6.13.

Dear Donald,

thanks for the great release candidates.
Here is the usual test report on WIndows 10 64 bit with tcl 32 bit 
compiled with prehistoric MS-VC6+SDK:

Please allow me to report the following build issues of bundeled packages:

1) tdbcmysql does not compile

C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win>echo 1,1,5,0  1>>versions.vc
*** Building against Tcl at 'C:\test\tcl8.6.13_rc3\win\..'
*** Intermediate directory will be 
'C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win\Release\tdbcmysql_ThreadedDynamic'
*** Output directory will be 
'C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win\Release'
*** Installation, if selected, will be in 'c:\test\tcl8613rc3\lib'
*** Suffix for binaries will be 't'
*** Compiler version 6. Target IX86, host AMD64.
        copy 
C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win\..\win\tdbcMysqlUuid.h.in+C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win\..\manifest.uuid 
C:\test\tcl8.6.13_rc3\pkgs\tdbcmysql1.1.5\win\Release\tdbcmysql_ThreadedDynamic\tdbcMysqlUuid.h
Das System kann die angegebene Datei nicht finden.
NMAKE : fatal error U1077: 'copy' : return code '0x1'
Stop.

I diffed this with:
https://core.tcl-lang.org/tdbcmysql/zip/45eaed0c32/tdbc__mysql-45eaed0c32.zip
The files:
win/gitmanifest.in
win/svnmanifest.in
win/tdbcMysqlUuid.h.in
are not in the distribution.
I manually added "win/tdbcMysqlUuid.h.in".
-> this change makes it compile

2) sqlite3 does not compile

C:\test\tcl8.6.13_rc3\pkgs\sqlite3.40.0\win>echo 3,0,0,0  1>>versions.vc
*** Building against Tcl at 'C:\test\tcl8.6.13_rc3\win\..'
*** Intermediate directory will be 
'C:\test\tcl8.6.13_rc3\pkgs\sqlite3.40.0\win\Release\sqlite3_ThreadedDynamic'
*** Output directory will be 
'C:\test\tcl8.6.13_rc3\pkgs\sqlite3.40.0\win\Release'
*** Installation, if selected, will be in 'c:\test\tcl8613rc3\lib'
*** Suffix for binaries will be 't'
*** Compiler version 6. Target IX86, host AMD64.
makefile.vc(322) : fatal error U1023: syntax error in expression
Stop.

-> Line 322 is an "!endif".
I suppose, Jan (or Ashok) will quickly fix this tomorrow.

On the test side, I have a tk test failing:

==== textTag-18.1 TkTextPickCurrent tag bindings FAILED
==== Contents of test case:

    text .t -width 30 -height 4 -relief sunken -borderwidth 10 
-highlightthickness 10 -pady 2
    pack .t
    update ; # map the window, otherwise -warp can't be done

    .t insert end " Tag here " TAG " no tag here"
    .t tag configure TAG -borderwidth 4 -relief raised
    .t tag bind TAG <Enter>  {lappend res "%x %y tag-Enter"}
    .t tag bind TAG <Leave>  {lappend res "%x %y tag-Leave"}
    bind .t <Enter> {lappend res Enter}
    bind .t <Leave> {lappend res Leave}

    set res {}
    # Bindings must not trigger on the widget border, only over
    # the actual tagged characters themselves.
    # Note that we don't need to call controlPointerWarpTiming
    # in the following six calls because we're not checking that
    # the mouse pointer has actually moved but rather that the
    # tag binding mechanism of the text widget correctly triggers.
    event gen .t <Motion> -warp 1 -x 0 -y 0 ; update
    event gen .t <Motion> -warp 1 -x 10 -y 10 ; update
    event gen .t <Motion> -warp 1 -x 25 -y 25 ; update
    event gen .t <Motion> -warp 1 -x 20 -y 20 ; update
    event gen .t <Motion> -warp 1 -x 10 -y 10 ; update
    event gen .t <Motion> -warp 1 -x 25 -y 25 ; update
    set res

---- Result was:
Enter {25 25 tag-Enter} {10 10 tag-Leave} {25 25 tag-Enter} {20 20 
tag-Leave} {25 25 tag-Enter}
---- Result should have been (exact matching):
Enter {25 25 tag-Enter} {20 20 tag-Leave} {25 25 tag-Enter}
==== textTag-18.1 FAILED

Thank you all,
Harald