--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/classes/tests/@ltpda_test_runner/get_class_tests.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,21 @@
+% GET_CLASS_TESTS returns an array of test structures.
+% 
+% The tests for the toolbox classes are gathered in to an array of
+% structures of the form:
+% 
+%   test.utp     % instance of the unit test class
+%   test.methods % a cell-array of the methods to be run
+% 
+% VERSION: $Id: get_class_tests.m,v 1.2 2010/10/08 06:49:32 hewitson Exp $
+% 
+function tests = get_class_tests(runner)
+  
+  % look in the system test directory
+  loc = which('ltpda_startup');
+  idx = strfind(loc, filesep);
+  loc = loc(1:idx(end));
+  loc = fullfile(loc, '..', '..', 'classes', 'tests');
+  
+  tests = runner.get_tests_in_dir(loc);  
+  
+end
\ No newline at end of file