Change a test case in types3.test slightly so that it works with the latest versions of Tcl.

FossilOrigin-Name: 6e1f4df51ad32e36715cba16f9df0d17a08dc653