Check-in [6c627203b1]
Overview
Comment:Updated to invert the meaning of "threaded" when building CVS HEAD (which is threaded by default) in test suite (does not affect behaviour of KitCreator commands)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:6c627203b1f6ecd67da32dfdeab1806425488957
User & Date: rkeene on 2010-09-26 04:47:10
Other Links: manifest | tags
Context
2010-09-26
04:47
Updated to publish tests into an optional sub-directory check-in: 3887ad80a5 user: rkeene tags: trunk
04:47
Updated to invert the meaning of "threaded" when building CVS HEAD (which is threaded by default) in test suite (does not affect behaviour of KitCreator commands) check-in: 6c627203b1 user: rkeene tags: trunk
04:47
Updated to include build script in build log

Updated to include size of kit in published data check-in: 8563b223da user: rkeene tags: trunk

Changes

Modified build/test/publish-tests from [343dd2d6d2] to [93c8b06bf5].

    33     33   	}
    34     34   
    35     35   	return "Tcl $version for [string totitle $os] on $cpu"
    36     36   }
    37     37   
    38     38   proc pretty_print_buildinfo {buildinfo} {
    39     39   	set desc [list]
    40         -	foreach tag [list min static notk statictk threaded zip] {
           40  +	foreach tag [list min static notk statictk unthreaded threaded zip] {
    41     41   		if {[lsearch -exact $buildinfo $tag] != -1} {
    42     42   			switch -- $tag {
    43     43   				"min" {
    44     44   					lappend desc "Minimally Built"
    45     45   				}
    46     46   				"static" {
    47     47   					lappend desc "Statically Linked"
................................................................................
    51     51   				}
    52     52   				"statictk" {
    53     53   					lappend desc "Tk linked to Kit"
    54     54   				}
    55     55   				"threaded" {
    56     56   					lappend desc "Threaded"
    57     57   				}
           58  +				"unthreaded" {
           59  +					lappend desc "Without Threads"
           60  +				}
    58     61   				"zip" {
    59     62   					lappend desc "Kit Filesystem in Zip"
    60     63   				}
    61     64   			}
    62     65   		}
    63     66   	}
    64     67   
................................................................................
   154    157   	# Store kit information with all kits
   155    158   	set key [list $tclversion $kitos $kitcpu]
   156    159   	lappend allkitinfo($key) [array get kitinfo]
   157    160   }
   158    161   
   159    162   puts $fd "<html>"
   160    163   puts $fd "  <head>"
   161         -puts $fd "    <title>KitCreator Build Status</title>"
          164  +puts $fd "    <title>KitCreator Build and Test Status</title>"
   162    165   puts $fd "  </head>"
   163    166   puts $fd "  <body>"
          167  +puts $fd "    <h1>KitCreator Build and Test Status</h1>"
          168  +puts $fd "    <p>The following table represents the status of the test results from the KitCreator test suite.</p>"
   164    169   puts $fd "    <table cellpadding=\"2\" border=\"1\">"
   165    170   foreach key [lsort -dictionary [array names allkitinfo]] {
   166    171   	puts $fd "      <tr>"
   167    172   	puts $fd "        <th><u>Tclkit for [pretty_print_key $key]</u></th>"
   168    173   	puts $fd "        <th>Kit Size</th>"
   169    174   	puts $fd "        <th>Status</th>"
   170    175   	puts $fd "        <th>Log</th>"
................................................................................
   211    216   		puts $fd "        <td><small><a href=\"$kitinfo(buildfile)\">([pretty_print_size [file size [file join $WEBDIR $kitinfo(buildfile)]]])</a></small></td>"
   212    217   		puts $fd "        <td>[join $failedtestshtml {, }]</td>"
   213    218   		puts $fd "      </tr>"
   214    219   	}
   215    220   
   216    221   }
   217    222   puts $fd "    </table>"
          223  +puts $fd "    <p>Generated on [clock format [clock seconds]]</p>"
   218    224   puts $fd "  </body>"
   219    225   puts $fd "</html>"
   220    226   
   221    227   close $fd

Modified build/test/test from [014dfa22c8] to [0cfadb5b00].

   109    109   					echo "${kit}: Unable to create StaticTk and NoTk, ignoring NoTk" >&2
   110    110   				fi
   111    111   				;;
   112    112   		esac
   113    113   	done
   114    114   
   115    115   	for version in ${VERSIONS}; do
          116  +		# Work around changes in default behaviour
          117  +		if [ "${version}" = "cvs_HEAD" ]; then
          118  +			kit="$(echo "${kit}" | sed 's@-threaded@-unthreaded@')"
          119  +			args="$(echo "${args}" | sed 's@ --enable-threads@ --disable-threads@')"
          120  +		fi
          121  +
   116    122   		# Create Tclkit
   117    123   		createdkit="tclkit-${version}"
   118    124   		outputname="${TESTDIR}/kits/tclkit-${version}-${kit}"
   119    125   		failoutputname="${TESTDIR}/kits/failed/tclkit-${version}-${kit}"
   120    126   		buildlog="${outputname}-build.log"
   121    127   		failbuildlog="${failoutputname}-build.log"
   122    128