Explorar el Código

testfilenames lowercase

git-svn-id: branches/tg74/avx512@39723 -
tg74 hace 7 años
padre
commit
5224393bbb
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      tests/utils/avx/avxopcodes.pas

+ 1 - 1
tests/utils/avx/avxopcodes.pas

@@ -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