Revert "fix evstr for non sizeable variables ( enull, jnull, jnull, jvoid, ... )"
[scilab.git] / scilab / modules / string / tests / nonreg_tests / bug_9839.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2017 - Samuel GOUGEON
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // <-- NO CHECK REF -->
9 //
10 // <-- Non-regression test for bug 9839 -->
11 //
12 // <-- Bugzilla URL -->
13 // http://bugzilla.scilab.org/9839
14 //
15 // <-- Short Description -->
16 // evstr() failed when some components include ascii(10) or/and ascii(13) 
17 //         linebreak characters
18
19 a10 = ascii(10);
20 assert_checkequal(evstr(a10+"4"), []);
21 assert_checkequal(evstr([a10+"4" "5"]), [%nan 5]);
22 assert_checkequal(evstr([a10+"4" ; "5"]), [%nan ; 5]);
23 assert_checkequal(evstr(["3"+a10+"4" "5"]), [3 5]);
24 assert_checkequal(evstr(["3"+a10+"4" ; "5"]), [3 ; 5]);
25 assert_checkequal(evstr(["%i"+a10+"4" "5"]), [%i 5]);
26 assert_checkequal(evstr(["%i"+a10+"4" ; "5"]), [%i ; 5]);
27
28 a13 = ascii(13);
29 assert_checkequal(evstr(a13+"4"), []);
30 assert_checkequal(evstr([a13+"4" "5"]), [%nan 5]);
31 assert_checkequal(evstr([a13+"4" ; "5"]), [%nan ; 5]);
32 assert_checkequal(evstr(["3"+a13+"4" "5"]), [3 5]);
33 assert_checkequal(evstr(["3"+a13+"4" ; "5"]), [3 ; 5]);
34 assert_checkequal(evstr(["%i"+a13+"4" "5"]), [%i 5]);
35 assert_checkequal(evstr(["%i"+a13+"4" ; "5"]), [%i ; 5]);