paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-15 05:08:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazUtils: Test: TestMasks: Add test for issue #39462.

Browse Source
This commit is contained in:
Bart 2021-11-20 13:00:04 +01:00
parent 9213ca32e8
commit 7fb173f384
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/lazutils/test/testmasks.lpr
View File

@ -335,6 +335,7 @@ begin
TestMaskWindows('x \ y', '? \\ ?', False); TestMaskWindows('x \ y', '? \\ ?', False);
TestMaskWindows('', 'a', False); TestMaskWindows('', 'a', False);
TestMaskWindows('', '[a]', False); TestMaskWindows('', '[a]', False);
TestMaskWindows('foo','foo.*',True);
end; end;
{$R *.res} {$R *.res}