Posted to tcl by hypnotoad at Tue Nov 07 16:52:18 GMT 2017view pretty
Tests running in interp: /Users/seandeelywoods/dev/dirt/tcl/unix/tcltest Tests located in: /Users/seandeelywoods/dev/dirt/tcl/tests Tests running in: /Users/seandeelywoods/dev/dirt/tcl/unix Temporary files stored in /Users/seandeelywoods/dev/dirt/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 Tue Nov 07 11:46:19 EST 2017 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 ==== exec-19.1 exec >> uses O_APPEND FAILED ==== Contents of test case: # Note that we have to allow for the current contents of the temporary # file, which is why the result is 14 and not 12 exec /bin/sh -c {for a in 1 2 3; do sleep 1; echo $a; done} >>$tmpfile & exec /bin/sh -c {for a in 4 5 6; do sleep 1; echo $a >&2; done} 2>>$tmpfile & exec /bin/sh -c {for a in a b c; do sleep 1; echo $a; done} >>$tmpfile & exec /bin/sh -c {for a in d e f; do sleep 1; echo $a >&2; done} 2>>$tmpfile & # The above four shell invokations take about 3 seconds to finish, so allow # 5s (in case the machine is busy) after 5000 # Check that no bytes have got lost through mixups with overlapping # appends, which is only guaranteed to work when we set O_APPEND on the # file descriptor in the [exec >>...] file size $tmpfile ---- Result was: 24 ---- Result should have been (exact matching): 26 ==== exec-19.1 FAILED 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 ==== socket-14.0.0 [socket -async] when server only listens on IPv4 FAILED ==== Contents of test case: set client [socket -async localhost $port] set after [after $latency {set x [fconfigure $client -error]}] vwait x set x ---- Result was: ---- Result should have been (exact matching): ok ==== socket-14.0.0 FAILED ==== socket-14.2 [socket -async] fileevent connection refused FAILED ==== Contents of test case: set client [socket -async localhost [randport]] fileevent $client writable {set x ok} set after [after $latency {set x timeout}] vwait x after cancel $after lappend x [fconfigure $client -error] ---- Result was: timeout {} ---- Result should have been (exact matching): ok {connection refused} ==== socket-14.2 FAILED 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 Tue Nov 07 11:49:41 EST 2017 all.tcl: Total 31460 Passed 30166 Skipped 1289 Failed 5 Sourced 148 Test Files. Files with failing tests: exec.test macOSXFCmd.test socket.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 5 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 7 testpreferstable 1 testwinclock 21 testwordend 189 thread 2 unthreaded 2 wideBiggerThanInt 504 win 4 winVista 6 xdev basra:unix seandeelywoods$