@@ -36,9 +36,9 @@ } proc pretty_print_buildinfo {buildinfo} { set desc [list] - foreach tag [list min static notk statictk threaded zip] { + foreach tag [list min static notk statictk unthreaded threaded zip] { if {[lsearch -exact $buildinfo $tag] != -1} { switch -- $tag { "min" { lappend desc "Minimally Built" @@ -54,8 +54,11 @@ } "threaded" { lappend desc "Threaded" } + "unthreaded" { + lappend desc "Without Threads" + } "zip" { lappend desc "Kit Filesystem in Zip" } } @@ -157,11 +160,13 @@ } puts $fd "" puts $fd " " -puts $fd " KitCreator Build Status" +puts $fd " KitCreator Build and Test Status" puts $fd " " puts $fd " " +puts $fd "

KitCreator Build and Test Status

" +puts $fd "

The following table represents the status of the test results from the KitCreator test suite.

" puts $fd " " foreach key [lsort -dictionary [array names allkitinfo]] { puts $fd " " puts $fd " " @@ -214,8 +219,9 @@ } } puts $fd "
Tclkit for [pretty_print_key $key]
" +puts $fd "

Generated on [clock format [clock seconds]]

" puts $fd " " puts $fd "" close $fd