* Bug #9052 fixed - Some Demos in graphics were automatically closed at the end of...
[scilab.git] / scilab / modules / graphics / tests / nonreg_tests / bug_9052.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Charlotte HECQUET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- TEST WITH GRAPHIC -->
8 // <-- Non-regression test for bug 9052 -->
9 //
10 // <-- Bugzilla URL -->
11 // http://bugzilla.scilab.org/9052
12 //
13 // <-- Short Description -->
14 // All demos in graphics/animations are automatically closed at the end of each one
15
16 xdel(winsid());
17 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim1","anim1.sce");
18 exec(path_demo,-1);
19 assert_checkequal(winsid(), 100001);
20 xdel(winsid());
21 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim2","anim2.sce");
22 exec(path_demo,-1);
23 assert_checkequal(winsid(), 100001);
24 xdel(winsid());
25 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim3","anim3.sce");
26 exec(path_demo,-1);
27 assert_checkequal(winsid(), 100001);
28 xdel(winsid());
29 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim4","anim4.sce");
30 exec(path_demo,-1);
31 assert_checkequal(winsid(), 100001);
32 xdel(winsid());
33 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim5","anim5.sce");
34 exec(path_demo,-1);
35 assert_checkequal(winsid(), 100001);
36 xdel(winsid());
37 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim6","anim6.sce");
38 exec(path_demo,-1);
39 assert_checkequal(winsid(), 100001);
40 xdel(winsid());
41 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim7","anim7.sce");
42 exec(path_demo,-1);
43 assert_checkequal(winsid(), 100001);
44 xdel(winsid());
45 path_demo = fullfile(SCI,"modules","graphics","demos","anim","anim8","anim8.sci");
46 exec(path_demo,-1);
47 demo_riemann();
48 assert_checkequal(winsid(), 100001);
49 xdel(winsid());
50 path_demo = fullfile(SCI,"modules","graphics","demos","anim","bubbleSort","bubbleSort.sci");
51 exec(path_demo,-1);
52 demo_bubbleSort();
53 assert_checkequal(winsid(), 0);