Differences From Artifact [4af4948972]:
- File example/main.tcl — part of check-in [12ff77016f] at 2019-09-14 04:56:19 on branch trunk — Added support for accessProc and mapped X_OK to directories (user: rkeene, size: 2497) [annotate] [blame] [check-ins using]
To Artifact [eabae151b2]:
- File example/main.tcl — part of check-in [fa71466879] at 2019-09-14 05:24:52 on branch trunk — Comment out broken tests (user: rkeene, size: 2556) [annotate] [blame] [check-ins using]
1 2 3 4 5 6 7 8 9 | 1 2 3 4 5 6 7 8 9 10 | + | set dir "//xvfs:/example" set dirNative [file join [pwd] example] #set dir $dirNative set file "${dir}/foo" set fd [open $file] seek $fd 0 end seek $fd -1 current set check [read $fd 1] if {$check != "\n"} { |
︙ | |||
113 114 115 116 117 118 119 120 121 | 114 115 116 117 118 119 120 121 122 123 124 125 126 127 | + + - + + | } cd $dir cd lib glob * # XXX:TODO:CURRENTLY BROKEN if {0} { lappend auto_path ${dir}/lib package require hello |