* Bug 15248: lsq() was leaking memory
[scilab.git] / scilab / modules / linear_algebra / tests / nonreg_tests / bug_15248.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2019 - St├ęphane MOTTELET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //
8 // <-- CLI SHELL MODE -->
9 // <-- NO CHECK REF -->
10 //
11 // <-- Non-regression test for bug 15248 -->
12 //
13 // <-- Bugzilla URL -->
14 // http://bugzilla.scilab.org/15248
15 //
16 // <-- Short Description -->
17 // lsq() is leaking memory
18
19 m1 = getmemory();
20 a = rand(100,100);
21 b = rand(100,100);
22 for i=1:20000
23     x = lsq(a,b);
24 end
25 clear i a b x
26 m2 = getmemory();
27 assert_checktrue((m1-m2)/m1 <= 0);