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
|
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
|
+
+
+
+
|
set build_kitcreator_version $args(kitcreator_version)
## Optional Arguments
set build_packages [list]
set build_options(threaded) 0
set build_options(kitdll) 0
set build_options(debug) 0
set build_options(dynamictk) 0
foreach arg [array names args] {
switch -glob -- $arg {
"option_package_*" {
set package [join [lrange [split $arg _] 2 end] _]
lappend build_packages $package
}
"option_threaded" {
set build_options(threaded) 1
}
"option_kitdll" {
set build_options(kitdll) 1
}
"option_debug" {
set build_options(debug) 1
}
"option_dynamictk" {
set build_options(dynamictk) 1
}
"option_storage" {
switch -- $args($arg) {
"mk4" - "zip" - "cvfs" {
set build_options(storage) $args($arg)
}
}
}
|
320
321
322
323
324
325
326
327
328
329
330
331
332
333
|
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
|
+
|
<td>
<? foreach package [lsort -dictionary [array names packages]] { ?>
<input type="checkbox" name="option_package_<? puts -nonewline $package ?>" id="option_package_<? puts -nonewline $package ?>">Package: <? puts -nonewline $packages($package) ?><br>
<? } ?>
<input type="checkbox" name="option_threaded">Kit: Threaded<br>
<input type="checkbox" name="option_debug">Kit: Debugging Build<br>
<input type="checkbox" name="option_kitdll" id="option_kitdll">Kit: Build Library (KitDLL)<br>
<input type="checkbox" name="option_dynamictk" id="option_dynamictk">Kit: Always link Tk dynamically (if Tk is built)
</td>
</tr>
<tr>
<td>Kit Storage:</td>
<td>
<select name="option_storage">
<option value="auto">Automatically Determined</option>
|