Xcos: add a function type for debugging
[scilab.git] / scilab / modules / xcos / tests / nonreg_tests / bug_8480.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2010 - DIGITEO - ClĂ©ment DAVID
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //
8 // <-- ENGLISH IMPOSED -->
9 //
10 // <-- TEST WITH XCOS -->
11 //
12 // <-- Non-regression test for bug 8480 -->
13 //
14 // <-- Bugzilla URL -->
15 // http://bugzilla.scilab.org/show_bug.cgi?id=8480
16 //
17 // <-- Short Description -->
18 // The debug block did not have a valid function type.
19 //
20
21 // start a clean scilab
22 Result_ref=[1,4,0;
23 1,4,0;
24 2,4,0;
25 2,4,0;
26 3,4,0;
27 3,4,0;
28 8,4,0;
29 8,4,0;
30 9,4,0;
31 9,4,0;
32 1,6,0;
33 1,6,0;
34 2,6,0;
35 2,6,0;
36 3,6,0;
37 3,6,0;
38 8,6,0;
39 8,6,0;
40 9,6,0;
41 9,6,0;
42 1,6,0;
43 1,6,0;
44 2,6,0;
45 2,6,0;
46 3,6,0;
47 3,6,0;
48 8,6,0;
49 8,6,0;
50 9,6,0;
51 9,6,0;
52 1,6,0;
53 1,6,0;
54 2,6,0;
55 2,6,0;
56 3,6,0;
57 3,6,0;
58 8,6,0;
59 8,6,0;
60 9,6,0;
61 9,6,0;
62 1,1,0;
63 1,1,0;
64 3,1,0;
65 3,1,0;
66 8,1,0;
67 8,1,0;
68 9,1,0;
69 9,1,0;
70 2,1,0;
71 2,1,0;
72 3,2,0;
73 3,2,0;
74 8,3,0;
75 8,3,0;
76 8,2,0;
77 8,2,0;
78 9,2,0;
79 9,2,0;
80 1,1,0.5;
81 1,1,0.5;
82 3,1,0.5;
83 3,1,0.5;
84 8,1,0.5;
85 8,1,0.5;
86 9,1,0.5;
87 9,1,0.5;
88 2,1,0.5;
89 2,1,0.5;
90 3,2,0.5;
91 3,2,0.5;
92 8,3,0.5;
93 8,3,0.5;
94 8,2,0.5;
95 8,2,0.5;
96 9,2,0.5;
97 9,2,0.5;
98 1,5,1;
99 1,5,1;
100 2,5,1;
101 2,5,1;
102 3,5,1;
103 3,5,1;
104 8,5,1;
105 8,5,1;
106 9,5,1;
107 9,5,1];
108 importXcosDiagram('SCI/modules/xcos/tests/nonreg_tests/bug_8480.xcos');
109 global Result;Result=[];
110 Info=scicos_simulate(scs_m,list());
111 if ~and(Result==Result_ref) then pause,end
112 //k=find(Result(:,1)<>Result_ref(:,1));
113 clearglobal Result