paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 21:49:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix error in version sorting

Browse Source
This commit is contained in:
Michaël Van Canneyt 2025-03-02 11:35:55 +01:00
parent 28233953c1
commit af52e8ce9a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/utils/tsdb.pp
View File

@ -424,7 +424,7 @@ begin
Case aType of Case aType of
mtCPU : lSQL:='SELECT TC_ID FROM TESTCPU order by TC_ID'; mtCPU : lSQL:='SELECT TC_ID FROM TESTCPU order by TC_ID';
mtOS : lSQL:='SELECT TO_ID FROM TESTOS order by TO_ID'; mtOS : lSQL:='SELECT TO_ID FROM TESTOS order by TO_ID';
mtVersion : lSQL:='SELECT TV_ID FROM TESTVERSION order by TO_ID'; mtVersion : lSQL:='SELECT TV_ID FROM TESTVERSION order by TV_ID';
end; end;
Qry:=CreateQuery(lSQL); Qry:=CreateQuery(lSQL);
try try