Check-in [eaf3feab27]
Overview
Comment:Added support for starting Xvfb before beginning tests (to test Tk)

Added Tk test

Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: eaf3feab277ae8979dfedeaad42f449bb42c759d
User & Date: rkeene on 2010-09-26 04:48:55
Other Links: manifest | tags
Context
2010-09-26
04:49
Updated to support static Tk on non-Windows platforms check-in: 70da029110 user: rkeene tags: trunk
04:48
Added support for starting Xvfb before beginning tests (to test Tk)

Added Tk test check-in: eaf3feab27 user: rkeene tags: trunk

04:48
Updated to run tests at low priority check-in: 39e9180a10 user: rkeene tags: trunk
Changes

Modified build/test/test from [648b46f86c] to [472fc137a9].

40
41
42
43
44
45
46






47
48
49
50
51
52
53
	if echo "${file}" | grep -- '-build.log$' >/dev/null; then
		continue
	fi

	rm -f "${file}"
done







failed=""
for kit in normal normal-zip normal-threaded normal-threaded-zip normal-statictk normal-notk normal-threaded-notk normal-threaded-zip-notk normal-nomk4 min min-static win32-i586 win32-i586-zip win32-i586-threaded win32-i586-threaded-zip win32-i586-notk win32-i586-threaded-notk win32-i586-nomk4 linux-arm-min; do
	kitcreator="./kitcreator"
	args=""
	runnable="1"
	iszip="0"
	statictk="0"







>
>
>
>
>
>







40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
	if echo "${file}" | grep -- '-build.log$' >/dev/null; then
		continue
	fi

	rm -f "${file}"
done

# Start Xvfb for X11-based tests
Xvfb -nolisten tcp :31 >/dev/null 2>/dev/null &
XVFB_PID="$!"
DISPLAY=:31
export DISPLAY

failed=""
for kit in normal normal-zip normal-threaded normal-threaded-zip normal-statictk normal-notk normal-threaded-notk normal-threaded-zip-notk normal-nomk4 min min-static win32-i586 win32-i586-zip win32-i586-threaded win32-i586-threaded-zip win32-i586-notk win32-i586-threaded-notk win32-i586-nomk4 linux-arm-min; do
	kitcreator="./kitcreator"
	args=""
	runnable="1"
	iszip="0"
	statictk="0"
314
315
316
317
318
319
320



		done
	done
done

if [ -n "${failed}" ]; then
	echo "Failed: ${failed}"
fi










>
>
>
320
321
322
323
324
325
326
327
328
329
		done
	done
done

if [ -n "${failed}" ]; then
	echo "Failed: ${failed}"
fi

# Terminate Xvfb
kill -9 "${XVFB_PID}"

Added build/test/tests/07-tk.tcl version [f943d31ad3].













































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#! /usr/bin/env tclsh

# Determine if we should have Tk
set buildflags [split [lindex $argv 1] -]
foreach flag [list notk min] {
	if {[lsearch -exact $buildflags $flag] != -1} {
		exit 0
	}
}

package require Tk

label .l
pack .l

if {[winfo children .] == ".l"} {
	exit 0
}

puts "Winfo Children: [winfo children .]"

exit 1