Artifact 9a811a5937bf97c309523e883475ec4af173594e:

• File build/test/tests/12-threads.tcl — part of check-in [6a3474d699] at 2010-10-04 04:52:16 on branch trunk — Added Threads test (user: rkeene, size: 381) [annotate] [blame] [check-ins using]

#! /usr/bin/env tclsh

set buildflags [split [lindex $argv 1] -]

if {$tcl_version == "8.6"} {
	if {[lsearch -exact $buildflags "unthreaded"] == -1} {
		set isthreaded 1
	} else {
		set isthreaded 0
	}
} else {
	if {[lsearch -exact $buildflags "threaded"] == -1} {
		set isthreaded 0
	} else {
		set isthreaded 1
	}
}

if {!$isthreaded} {
	exit 0
}

package require Thread

exit 0