* Bug #13524 fixed - strtod did not ignore the tabs and CR.
[scilab.git] / scilab / modules / string / tests / nonreg_tests / bug_13524.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Vladislav TRUBKIN
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- Non-regression test for bug 13524 -->
8 //
9 // <-- Bugzilla URL -->
10 // http://bugzilla.scilab.org/13524
11 //
12 // <-- Short Description -->
13 // strtod did not ignore the tabs and CR
14 //
15 // check \t
16 str = msprintf("\t 10");
17 v = strtod(str);
18 assert_checkequal(v, 10);
19 str = msprintf("\t 1.5");
20 v = strtod(str);
21 assert_checkequal(v, 1.5);
22 str = msprintf("\t          1.5");
23 v = strtod(str);
24 assert_checkequal(v, 1.5);
25 str = msprintf("        \t          1.5");
26 v = strtod(str);
27 assert_checkequal(v, 1.5);
28 str = msprintf("\n  \t  1.5");
29 v = strtod(str);
30 assert_checkequal(v, [%nan; 1.5]);
31 str = msprintf("\t  1.5end");
32 [v, endStr] = strtod(str);
33 assert_checkequal(v, 1.5);
34 assert_checkequal(endStr, "end");
35 // check \r
36 str = msprintf("\r 10");
37 v = strtod(str);
38 assert_checkequal(v, 10);
39 str = msprintf("\r 1.5");
40 v = strtod(str);
41 assert_checkequal(v, 1.5);
42 str = msprintf("\r          1.5");
43 v = strtod(str);
44 assert_checkequal(v, 1.5);
45 str = msprintf("        \r          1.5");
46 v = strtod(str);
47 assert_checkequal(v, 1.5);
48 str = msprintf("\n  \r  1.5");
49 v = strtod(str);
50 assert_checkequal(v, [%nan; 1.5]);
51 str = msprintf("\r  1.5end");
52 [v, endStr] = strtod(str);
53 assert_checkequal(v, 1.5);
54 assert_checkequal(endStr, "end");