paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 12:26:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix missing aarch64 CPU in ShowHistory for one test

Browse Source 
git-svn-id: trunk@32096 -
This commit is contained in:
pierre 2015-10-19 14:47:50 +00:00
parent 325a79b81b
commit 854d04bb46
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/utils/testsuite/utests.pp
View File

@ -1982,7 +1982,7 @@ begin
end
else
begin
cpu_last:=StrToInt(GetSingleton('SELECT COUNT(*) FROM TESTCPU'));
cpu_last:=StrToInt(GetSingleton('SELECT MAX(TC_ID) FROM TESTCPU'));
cpu_size:=Sizeof(StatusLongintArray)*(1+cpu_last);
cpu_count:=GetMem(cpu_size);
FillChar(cpu_count^,cpu_size,#0);
@ -2002,7 +2002,7 @@ begin
end
else
begin
version_last:=StrToInt(GetSingleton('SELECT COUNT(*) FROM TESTVERSION'));
version_last:=StrToInt(GetSingleton('SELECT MAX(TV_ID) FROM TESTVERSION'));
version_size:=Sizeof(StatusLongintArray)*(1+version_last);
version_count:=GetMem(version_size);
FillChar(version_count^,version_size,#0);
@ -2024,7 +2024,7 @@ begin
end
else
begin
os_last:=StrToInt(GetSingleton('SELECT COUNT(*) FROM TESTOS'));
os_last:=StrToInt(GetSingleton('SELECT MAX(TO_ID) FROM TESTOS'));
os_size:=Sizeof(StatusLongintArray)*(1+os_last);
os_count:=GetMem(os_size);
FillChar(os_count^,os_size,#0);