mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 17:49:27 +02:00
testfilenames lowercase
git-svn-id: branches/tg74/avx512@39723 -
This commit is contained in:
parent
38ab34978b
commit
5224393bbb
@ -3807,7 +3807,7 @@ begin
|
||||
|
||||
while sl.Count < 8 do sl.Add('');
|
||||
|
||||
NewOpCode := sl[0];
|
||||
NewOpCode := ansilowercase(sl[0]);
|
||||
if NewOpCode <> '' then
|
||||
begin
|
||||
if NewOpCode <> LastOpCode then
|
||||
|
Loading…
Reference in New Issue
Block a user