Mercurial > hg > ltpda

comparison testing/utp_1.1/generic_utps/utp_10.m @ 44:409a22968d5e default

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add unit tests
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Tue, 06 Dec 2011 18:42:11 +0100
parents
children
comparison
equal deleted inserted replaced
43:bc767aaa99a8 44:409a22968d5e
1 % <TestDescription>
2 %
3 % Check that the <METHOD> method pass back the output objects to a list of
4 % output variables or to a single variable.
5 %
6 % </TestDescription>
7 function result = utp_10(method, obj1, obj2, ple2)
8
9 % <SyntaxDescription>
10 %
11 % Call the method with a list of output variables and with a single output
12 % variable. Additionaly check that the rebuild method works on the output.
13 %
14 % </SyntaxDescription>
15
16 try
17 % <SyntaxCode>
18 [o1, o2] = feval(method, obj1, obj2);
19 o3 = feval(method, obj1, obj2);
20 mout1 = rebuild(o1);
21 mout2 = rebuild(o2);
22 mout3 = rebuild(o3);
23 % </SyntaxCode>
24 stest = true;
25 catch err
26 disp(err.message)
27 stest = false;
28 end
29
30 % <AlgoDescription>
31 %
32 % 1) Check that the output contains the right number of objects
33 % 2) Check that the 'rebuild' method produces the same object as 'out'.
34 %
35 % </AlgoDescription>
36
37 atest = true;
38 if stest
39 % <AlgoCode>
40 % Check the number of outputs
41 if numel(o1) ~=1, atest = false; end
42 if numel(o2) ~=1, atest = false; end
43 if numel(o3) ~=2, atest = false; end
44 % Check the rebuilding of the object
45 if ~eq(o1, mout1, ple2), atest = false; end
46 if ~eq(o2, mout2, ple2), atest = false; end
47 if ~eq(o3, mout3, ple2), atest = false; end
48 % </AlgoCode>
49 else
50 atest = false;
51 end
52
53 % Return a result structure
54 dd = dbstack;
55 mfilename = dd(2).file(1:end-2);
56 result = utp_prepare_result(atest, stest, dbstack, mfilename);
57 end % END UTP_10