moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-27 11:32:18 -05:00
Code Issues Releases Wiki Activity

More cleanups to CTS.

Browse Source
This commit is contained in:
Merlijn Wajer 2011-06-13 17:44:04 +02:00
parent 9415d08100
commit b87a123701
1 changed files with 4 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
Units/MMLCore/finder.pas
View File

@ -639,24 +639,15 @@ begin
HiSpiral := (dy+1) * (dx + 1) -1;
case CTS of
0:
begin
i := cts0();
if i <> -1 then
goto Hit;
end;
1:
begin
i := cts1();
2:
i := cts2();
end;
if i <> -1 then
goto Hit;
end;
2:
{ Can be optimized a lot... RGBToHSL isn't really inline, }
begin
end;
end;
Result := False;
TClient(Client).IOManager.FreeReturnData;
Exit;