1
2
3
4
5
6
7
8
9
10
11
12
|
#! /usr/bin/env tclsh
package require Tcl 8.5
set WEBDIR "/web/rkeene/devel/kitcreator/kitbuild"
if {![file isdir "kits"]} {
puts stderr "Could not find kits/ directory, aborting."
exit 1
}
set noncriticaltests [list "05-locale"]
|
>
>
>
>
>
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#! /usr/bin/env tclsh
package require Tcl 8.5
set WEBDIR "/web/rkeene/devel/kitcreator/kitbuild"
if {[llength $argv] == 1} {
# If a single argument is given, put results in that sub-directory
set WEBDIR [file join $WEBDIR [lindex $argv 0]]
}
if {![file isdir "kits"]} {
puts stderr "Could not find kits/ directory, aborting."
exit 1
}
set noncriticaltests [list "05-locale"]
|