/[ascend]/trunk/base/generic/linear/test/test_register_linear.c
ViewVC logotype

Contents of /trunk/base/generic/linear/test/test_register_linear.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1319 - (show annotations) (download) (as text)
Tue Mar 6 00:22:28 2007 UTC (13 years, 4 months ago) by jpye
File MIME type: text/x-csrc
File size: 1306 byte(s)
Added test suite for linsolqr (very early days still) for checking by Ben
1 /* ASCEND modelling environment
2 Copyright (C) 2005 Jerry St.Clair
3 Copyright (C) 2006-2007 Carnegie Mellon University
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
8 any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA.
19 */
20
21 #include "CUnit/CUnit.h"
22 #include <utilities/ascConfig.h>
23 #include "test_register_linear.h"
24
25 #define PROTO_TEST(NAME) PROTO(linear,NAME)
26 TESTS(PROTO_TEST)
27 #undef PROTO_TEST
28
29 #define REGISTER_TEST(NAME) \
30 result = test_register_linear_##NAME(); \
31 if(CUE_SUCCESS!=result){ \
32 return result; \
33 }
34
35 #define REGISTER_SUITE(SUITENAME,TESTS) \
36 CU_ErrorCode test_register_##SUITENAME(void){ \
37 CU_ErrorCode result = CUE_SUCCESS; \
38 TESTS(REGISTER_TEST) \
39 return result; \
40 }
41
42 REGISTER_SUITE(linear,TESTS)

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22