@@ -59,11 +59,11 @@ return "Tcl $version for [string totitle $os] on $cpu" } proc pretty_print_buildinfo {buildinfo} { set desc [list] - foreach tag [list kitdll min static notk nomk4 statictk unthreaded threaded zip] { + foreach tag [list kitdll debug min static notk nomk4 statictk unthreaded threaded zip] { if {[lsearch -exact $buildinfo $tag] != -1} { switch -- $tag { "kitdll" { lappend desc "Built as a Library" } @@ -89,10 +89,13 @@ lappend desc "Without Threads" } "zip" { lappend desc "Kit Filesystem in Zip" } + "debug" { + lappend desc "With Symbols" + } } } } if {[llength $desc] == 0} {