Re: [TCLCORE] Tcl / Tk 8.6.8 Release Candidates

[Dipl. I. S. G. B. <se...@us...>]

 

Hi Harald, 

in VS "inline" is normally for C++ only, for C it can be defined like: 

nmake -nologo -f makefile.vc TCLDIR=%TCLDIR% OPTS=...
OPTDEFINES="-DINLINE=__INLINE" 

No idea which parameter exactly can be used to extend options from
command-line by tdbcodbc (OPTDEFINES, ADDOPTDEFINES, OPTIMIZATIONS,
etc.)...
Just take a look in rules.vc resp. makefile.vc for it... 

Regards,
Sergey. 

Am 21.12.2017 18:16, schrieb Harald Oehlmann: 

> Dear folks,
> 
> I think I have overlooked an issue.
> 
> Here is a compilation error in tdbcodbc.c
> 
> tdbcodbc.c
> C:testtcl8.6.8pkgstdbcodbc1.0.6win..generictdbcodbc.c(1009) :
> error C2054: expected '(' to follow 'inline'
> C:testtcl8.6.8pkgstdbcodbc1.0.6win..generictdbcodbc.c(1013) :
> error C2082: redefinition of formal parameter 'LookupOdbcType'
> C:testtcl8.6.8pkgstdbcodbc1.0.6win..generictdbcodbc.c(1013) :
> error C2143: syntax error : missing ';' before '{'
> 
> This is MSVC 6++ win32 compilation. There is normally a macro which uses
> "_inline", as the inline keyword does not exist on MSVC6.
> 
> Thank you,
> Harald
> 
> Am 21.12.2017 um 16:40 schrieb Harald Oehlmann:
> 
>> Dear Donald, big christmas present to the community ! Now it compiles well. Here are the test differences compared to tcl 8.6.7, details below: New failures: Tk: imgPNG-3.1, textTag-18.1 Still failing: Tcl: cmdAH-25.3.1 fCmd-9.9 fCmd-9.11 iortrans-11.1 iortrans-11.2 winFCmd-2.8 iTCL: sfbug-254 sfbug-257 Tk: winfont-2.7 winfont-2.8 winfont-2.9 Thank you, great ! Harald -- Details -- ==== imgPNG-3.1 reading image with unknown ancillary chunk - bug [1c659ef0f1] FAILED ==== Contents of test case: # the image contains an unknown chunk iDOT # since the name of this chunk starts with a lowercase letter, # it's an ancillary chunk that shall not trigger an error catch {set i [image create photo -file $fileName]} ---- Result was: 1 ---- Result should have been (exact matching): 0 ---- Test cleanup failed: image "image19" doesn't exist ---- errorInfo(cleanup): image "image19" doesn't exist while executing "image delete $i" ("uplevel" body line 2) invoked from within "uplevel 1 $cleanup" ----
errorCode(cleanup): TK LOOKUP IMAGE image19 ==== imgPNG-3.1 FAILED ==== 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 .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. 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 return $res ---- Result was: {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 ------------------------------------------------------------------------------ Check out the vibrant tech community on one of the world's most engaging tech sites, Slashdot.org! http://sdm.link/slashdot [1] _______________________________________________ Tcl-Core mailing list Tcl...@li... https://lists.sourceforge.net/lists/listinfo/tcl-core [2]
> 
> -- 
> ELMICRON Dr. Harald Oehlmann GmbH
> Koesener Str. 85
> 06618 NAUMBURG - Germany
> Phone: +49 (0)3445 78112-0
> Fax: +49 (0)3445 78112-19
> www.Elmicron.de [3]
> German legal references:
> Geschaeftsfuehrer: Dr. Harald Oehlmann, Jens Oehlmann
> UST Nr. / VAT ID No.: DE206105272
> HRB 212803 Stendal
> 
> ------------------------------------------------------------------------------
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot [1]
> _______________________________________________
> Tcl-Core mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-core [2]
 

Links:
------
[1] http://sdm.link/slashdot
[2] https://lists.sourceforge.net/lists/listinfo/tcl-core
[3] http://www.Elmicron.de