* Bug #15207 fixed : `xcos(scs_m)` did not work for sub-systems.
[scilab.git] / scilab / modules / xcos / tests / unit_tests / xcos.tst
1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2009 - DIGITEO
4 // Copyright (C) 2012 - Scilab Enterprises - Clement DAVID
5 // Copyright (C) 2017 - ESI Group - Clement DAVID
6 //
7 //  This file is distributed under the same license as the Scilab package.
8 // ============================================================================
9
10 // <-- TEST WITH XCOS -->
11 // <-- INTERACTIVE TEST -->
12
13 // we launch xcos then libs should be loaded
14 xcos();
15
16 // we launch xcos with an xcos demo file
17 xcos(SCI + "/modules/xcos/demos/Simple_Demo.zcos");
18
19 // we launch xcos with an xcos demo file with full path resolution
20 xcos("SCI/modules/xcos/demos/Simple_Demo.zcos");
21
22 // we launch xcos with cosf file
23 xcos(SCI + "/modules/scicos/palettes/Branching.cosf");
24
25 // we launch xcos with a scs_m instance
26 scs_m = scicos_diagram();
27 scs_m.objs($+1) = BIGSOM_f("define");
28 xcos(scs_m);
29
30 // we launch xcos with a full scs_m
31 importXcosDiagram(SCI+"/modules/xcos/demos/Discrete-KalmanFilter.zcos");
32 xcos(scs_m);
33
34 // we launch xcos with a scs_m subsystem
35 assert_checkequal(typeof(scs_m.objs(1).model.rpar), "diagram");
36 xcos(scs_m.objs(1).model.rpar);
37