Xcos: add hooks pre/post simulation
[scilab.git] / scilab / modules / xcos / tests / unit_tests / SEP_066_Xcos_stop_hooks.tst
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) DIGITEO - 2010-2010 - ClĂ©ment DAVID <clement.david@scilab.org>
3 //
4 // This file is distributed under the same license as the Scilab package.
5
6 // <-- TEST WITH XCOS -->
7 //
8 // <-- Short Description -->
9 // Check the API of the Xcos hooks, see SEP_066_Xcos_hooks.odt
10
11 loadXcosLibs();
12 global status;
13 status = [];
14
15 function continueSimulation = pre_xcos_simulate(scs_m, needcompile)
16         global status;
17
18         status = [status 'pre_called'];
19         continueSimulation = %f;
20 endfunction
21
22 function post_xcos_simulate(%cpr, scs_m, needcompile)
23         global status;
24
25         // check that the simulation has been run
26         f=gcf();
27         a=gca();
28         p=a.children(1);
29         assert_checkalmostequal(p.data($,1), 29.9);
30
31         status = [status 'post_called'];
32 endfunction
33
34 assert_checktrue(importXcosDiagram(SCI + "/modules/xcos/demos/Simple_Demo.xcos"));
35 xcos_simulate(scs_m, 4);
36
37 assert_checkequal(status, ["pre_called"])
38