Posted to tcl by hypnotoad at Thu Jan 04 02:41:31 GMT 2018view pretty

basra:unix seandeelywoods$ make test
DYLD_LIBRARY_PATH=`pwd`: TCLLIBPATH="/Users/seandeelywoods/build/dev-tcl/tcl/unix/pkgs" TCL_LIBRARY="/Users/seandeelywoods/build/dev-tcl/tcl/library" ./tcltest /Users/seandeelywoods/build/dev-tcl/tcl/tests/all.tcl 
Tests running in interp:  /Users/seandeelywoods/build/dev-tcl/tcl/unix/tcltest
Tests located in:  /Users/seandeelywoods/build/dev-tcl/tcl/tests
Tests running in:  /Users/seandeelywoods/build/dev-tcl/tcl/unix
Temporary files stored in /Users/seandeelywoods/build/dev-tcl/tcl/unix
Test files run in separate interpreters
Running tests that match:  *
Skipping test files that match:  l.*.test
Only running test files that match:  *.test
Tests began at Wed Jan 03 21:33:52 EST 2018
aaa_exit.test
append.test
appendComp.test
apply.test
assemble.test
assocd.test
async.test
autoMkindex.test
basic.test
binary.test
case.test
chan.test
chanio.test
clock.test
cmdAH.test
cmdIL.test
cmdInfo.test
cmdMZ.test
compExpr-old.test
compExpr.test
compile.test
concat.test
config.test
coroutine.test
dcall.test
dict.test
dstring.test
encoding.test
env.test
error.test
eval.test
event.test
exec.test
execute.test
expr-old.test
expr.test
fCmd.test
fileName.test
fileSystem.test
for-old.test
for.test
foreach.test
format.test
get.test
history.test
http.test
http11.test
httpold.test
if-old.test
if.test
incr-old.test
incr.test
indexObj.test
info.test
init.test
interp.test
io.test
ioCmd.test
ioTrans.test
iogt.test
join.test
lindex.test
link.test
linsert.test
list.test
listObj.test
llength.test
lmap.test
load.test
lrange.test
lrepeat.test
lreplace.test
lsearch.test
lset.test
lsetComp.test
macOSXFCmd.test


==== 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

macOSXLoad.test
main.test
mathop.test
misc.test
msgcat.test
namespace-old.test
namespace.test
notify.test
nre.test
obj.test
oo.test
ooNext2.test
opt.test
package.test
parse.test
parseExpr.test
parseOld.test
pid.test
pkgMkIndex.test
platform.test
proc-old.test
proc.test
pwd.test
reg.test
regexp.test
regexpComp.test
registry.test
rename.test
resolver.test
result.test
safe.test
scan.test
security.test
set-old.test
set.test
socket.test
source.test
split.test
stack.test
string.test
stringComp.test
stringObj.test
subst.test
switch.test
tailcall.test
tcltest.test
thread.test
timer.test
tm.test
trace.test
unixFCmd.test
unixFile.test
unixForkEvent.test
unixInit.test
unixNotfy.test
unknown.test
unload.test
uplevel.test
upvar.test
utf.test
util.test
var.test
while-old.test
while.test
winConsole.test
winDde.test
winFCmd.test
winFile.test
winNotify.test
winPipe.test
winTime.test
zlib.test

Tests ended at Wed Jan 03 21:36:59 EST 2018
all.tcl:	Total	31480	Passed	30194	Skipped	1284	Failed	2
Sourced 148 Test Files.
Files with failing tests: macOSXFCmd.test
Number of tests skipped for each constraint:
	9	!ieeeFloatingPoint
	3	asyncPipeChan
	76	bigEndian
	5	bug-3057639
	49	dde
	4	dontCopyLinks
	63	emptyTest
	1	execMknod
	7	fullutf
	2	hasIsoLocale
	1	knownBadTest
	39	knownBug
	2	largefileSupport
	100	localeRegexp
	48	longIs32bit
	79	memory
	45	nonPortable
	1	notDarwin9
	5	notNetworkFilesystem
	1	obsolete
	3	singleTestInterp
	1	testexprparser && !ieeeFloatingPoint
	1	testwinclock
	21	testwordend
	189	thread
	2	unthreaded
	2	wideBiggerThanInt
	504	win
	4	winVista
	6	xdev