DaimlerChrysler uses TCL in test applications to perform functional tests of automotive components.
They also have a classification tool (CTE) [http://www.systematic-testing.com] which can be used to generate test cases, and that tool comes with a TCL interface.