* Bug 4401 fixed - String: fix for isnum
[scilab.git] / scilab / modules / string / tests / nonreg_tests / bug_4401.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 - Scilab Enterprises - Paul Bignier: removed the instructions that
4 //                                                         involved real operations, such as %pi+1,
5 //                                                         because they are not handled by isnum anymore
6 // Copyright (C) 2009 - DIGITEO - Allan CORNET
7 //
8 //  This file is distributed under the same license as the Scilab package.
9 // =============================================================================
10 // <-- CLI SHELL MODE -->
11 // <-- Non-regression test for bug 4401 -->
12 //
13 // <-- Bugzilla URL -->
14 // http://bugzilla.scilab.org/show_bug.cgi?id=4401
15 //
16 // <-- Short Description -->
17 // isnum returns wrong values
18
19 //========================================================================================
20 assert_checktrue(  isnum("%pi")          );
21 assert_checkfalse( isnum("bla_bla")      );
22 assert_checktrue(  isnum("%nan")         );
23 assert_checktrue(  isnum("%inf")         );
24 assert_checktrue(  isnum("%e")            );
25 assert_checktrue(  isnum("%eps")          );
26 assert_checktrue(  isnum("+%eps")         );
27 assert_checktrue(  isnum("-%eps")         );
28 assert_checktrue(  isnum("Nan")           );
29 assert_checktrue(  isnum("Inf")           );
30 assert_checktrue(  isnum("Nan-%i*Nan")   );
31 assert_checktrue(  isnum("-Inf+Inf*%i")  );
32 assert_checktrue(  isnum("1-%i*%nan")  );
33 assert_checktrue(  isnum("-%eps+%e*%i")  );
34 assert_checkfalse( isnum("%t")            );
35 assert_checktrue(  isnum("%i")            );
36 assert_checktrue(  isnum("1+%i")          );
37 assert_checkfalse( isnum("1+%2i")         );
38 assert_checkfalse( isnum("1+%2*i")        );
39 assert_checktrue(  isnum("1+%i*2")        );
40 assert_checktrue(  isnum("1+2*%i")        );
41 //========================================================================================