65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
|
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
+
+
+
+
+
+
+
+
+
+
+
-
-
+
+
+
+
+
-
+
|
}
"threaded" {
if {$value} {
lappend args "--enable-threads"
} else {
lappend args "--disable-threads"
}
}
"debug" {
if {$value} {
lappend args "--enable-symbols"
set ::env(STRIP) true
}
}
"storage" {
lappend args "--enable-kit-storage=$value"
}
"staticmk4" {
}
"statictk" {
}
}
}
catch {
exec ./build/pre.sh
}
catch {
file delete "${outfile}.log"
}
catch {
set cmd [list $script $buildinfo(tcl_version) {*}$args]
set fd [open "${outfile}.log" w]
puts $fd "Running: [list $script $buildinfo(tcl_version) {*}$args]"
set fd [open "${outfile}.log" w+]
puts $fd "Running: $cmd"
close $fd
}
catch {
exec $script $buildinfo(tcl_version) {*}$args > "${outfile}.log" 2>@1
exec {*}$cmd >> "${outfile}.log" 2>@1
}
catch {
exec grep ^ {*}[glob */build.log] >> "${outfile}.log"
}
foreach file [list tclkit-$buildinfo(tcl_version) {*}[glob -nocomplain libtclkit*]] {
|