sparse: make tests pass
[scilab.git] / scilab / modules / sparse / tests / nonreg_tests / bug_9999.tst
1 // =============================================================================\r
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab\r
3 // Copyright (C) 2013 - Scilab Enterprises - Paul Bignier\r
4 //\r
5 //  This file is distributed under the same license as the Scilab package.\r
6 // =============================================================================\r
7 //\r
8 // <-- CLI SHELL MODE -->\r
9 //\r
10 // <-- Non-regression test for bug 9999 -->\r
11 //\r
12 // <-- Bugzilla URL -->\r
13 // http://bugzilla.scilab.org/show_bug.cgi?id=9999\r
14 //\r
15 // <-- Short Description -->\r
16 // The sparse() and ^ operators mix could fail.\r
17 \r
18 A=[1 2 ; 3 4];\r
19 res = sparse(A)^0 == sparse(A^0);\r
20 \r
21 assert_checkequal(res, sparse([%t %t ; %t %t]));\r