Eliminated code duplicates. #3349

Job	Run time
build (gcc)	1m 48s
build (gcc, CFLAGS=-DTK_NO_DEPRECATED=1)	1m 40s
test (gcc)	4m 3s
build (gcc, --disable-shared)	1m 41s
test (gcc, --disable-xft)	3m 59s
build (gcc, --disable-xft)	1m 46s
test (gcc, --enable-symbols)	3m 36s
build (gcc, --disable-xss)	1m 40s
build (gcc, --enable-symbols)	1m 19s
build (clang)	2m 7s
build (clang, CFLAGS=-DTK_NO_DEPRECATED=1)	2m 20s
build (clang, --disable-shared)	1m 51s
build (clang, --disable-xft)	2m 10s
build (clang, --disable-xss)	1m 56s
build (clang, --enable-symbols)	1m 29s
	33m 25s

Provide feedback