Re: [TCLCORE] Tcl 8.6.9 Release Candidate

[Kevin W. <kw...@co...>]

On 10/10/18 7:45 AM, Stefan Sobernig wrote:
>> Now available at
>>
>>      https://sourceforge.net/projects/tcl/files/Tcl/8.6.9/
>>
>> is a candidate file making up a pre-release of Tcl 8.6.9.
> Results for macOS 10.13.6:
> - Xcode 9.4.1, clang-902.0.39.2
> - Xcode 10 (clang-1000.11.45.2)
> - gcc-mp-8 (MacPorts gcc8 8.2.0_0) 8.2.0
>
> ./configure && make test
> ./configure && make CC=gcc-mp-8 test
>
> (with and w/o --disable-corefoundation)
> (with and w/o --enable-dtrace)
> (with and w/o --enable-framework)
>> all.tcl:    Total    33456    Passed    30359    Skipped    3095
>>   Failed    2
>> Sourced 149 Test Files.
> Failing ones:
>
> ==== macOSXFCmd-2.7 MacOSXSetFileAttribute - rsrclength FAILED
> ==== Contents of test case:
>
>      catch {file delete -force -- foo.test}
>      close [open foo.test w]
>      catch {
>      set f [open foo.test/..namedfork/rsrc w]
>      fconfigure $f -translation lf -eofchar {}
>      puts -nonewline $f "foo"
>      close $f
>      }
>      list [catch {file attributes foo.test -rsrclength} msg] $msg  [catch
> {file attributes foo.test -rsrclength 0} msg] $msg  [catch {file
> attributes foo.test -rsrclength} msg] $msg  [file delete -force -- foo.test]
>
> ---- Result was:
> 0 3 0 {} 0 3 {}
> ---- Result should have been (exact matching):
> 0 3 0 {} 0 0 {}
> ==== macOSXFCmd-2.7 FAILED
>
> ==== macOSXFCmd-4.1 TclMacOSXMatchType FAILED
> ==== Contents of test case:
>
>      file mkdir globtest
>      cd globtest
>      foreach f {bar baz foo inv inw .nv reg} {
>      catch {file delete -force -- $f.test}
>      close [open $f.test w]
>      }
>      catch {file delete -force -- dir.test}
>      file mkdir dir.test
>      catch {
>      file attributes bar.test -type FOOT
>      file attributes baz.test -creator FOOC -type FOOT
>      file attributes foo.test -creator FOOC
>      file attributes inv.test -hidden 1
>      file attributes inw.test -hidden 1 -type FOOT
>      file attributes dir.test -hidden 1
>      }
>      set res [list  [catch {glob *.test} msg] $msg  [catch {glob -types
> FOOT *.test} msg] $msg  [catch {glob -types {{macintosh type FOOT}}
> *.test} msg] $msg  [catch {glob -types FOOTT *.test} msg] $msg  [catch
> {glob -types {{macintosh type FOOTT}} *.test} msg] $msg  [catch {glob
> -types {{macintosh type {}}} *.test} msg] $msg  [catch {glob -types
> {{macintosh creator FOOC}} *.test} msg] $msg  [catch {glob -types
> {{macintosh creator FOOC} {macintosh type FOOT}} *.test} msg] $msg
> [catch {glob -types hidden *.test} msg] $msg  [catch {glob -types
> {hidden FOOT} *.test} msg] $msg  ]
>      cd ..
>      file delete -force globtest
>      set res
>
> ---- Result was:
> 0 {foo.test bar.test reg.test baz.test dir.test inv.test inw.test} 0
> {bar.test baz.test inw.test} 0 {bar.test baz.test inw.test} 1 {bad
> argument to "-types": FOOTT} 1 {expected Macintosh OS type but got
> "FOOTT": } 0 {foo.test reg.test inv.test} 0 {foo.test baz.test} 0
> baz.test 0 {.nv.test dir.test inv.test inw.test} 0 inw.test
> ---- Result should have been (exact matching):
> 0 {bar.test baz.test dir.test foo.test inv.test inw.test reg.test} 0
> {bar.test baz.test inw.test} 0 {bar.test baz.test inw.test} 1 {bad
> argument to "-types": FOOTT} 1 {expected Macintosh OS type but got
> "FOOTT": } 0 {foo.test inv.test reg.test} 0 {baz.test foo.test} 0
> baz.test 0 {.nv.test dir.test inv.test inw.test} 0 inw.test
> ==== macOSXFCmd-4.1 FAILED
>
>
I'm not sure why the rsrc and type-and-creator-code tests are being run; 
that stuff has been obsolete on the Mac for years. The failure of these 
tests signifies nothing.

--Kevin


-- 
Kevin Walzer
Code by Kevin
http://www.codebykevin.com