* Bug #13795 fixed - grep with regexp option did not match the empty string properly
[scilab.git] / scilab / modules / string / tests / nonreg_tests / bug_13795.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2016 - Scilab Enterprises - Pierre-Aime Agnel
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7
8 // <-- CLI SHELL MODE -->
9 // Non regression test for bug 13795
10 // grep with regular expressions options did not properly match the empty string ""
11 res = grep("", "/^$/","r")
12 assert_checkequal(res, 1);
13
14 res = grep("", "/^\s*$/","r")
15 assert_checkequal(res, 1);
16
17 A = [" ", "", " ", ""];
18 res = grep(A, "@\s*@", "r");
19 assert_checkequal(res, [1 2 3 4]);
20
21 A = [" ", "", " ", ""];
22 res = grep(A, "@\s+@", "r");
23 assert_checkequal(res, [1 3]);