paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 13:50:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

aggpas: reduce debugging

Browse Source 
git-svn-id: trunk@21992 -
This commit is contained in:
mattias 2009-10-03 15:33:15 +00:00
parent b3fdcae6d2
commit 456235d0ee
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/aggpas/src/agg_basics.pas
View File

@ -372,7 +372,7 @@ type
// thus instead of directly using SHR we emulate c++ solution. // thus instead of directly using SHR we emulate c++ solution.
function shr_int8 (i ,shift : int8 ) : int8; function shr_int8 (i ,shift : int8 ) : int8;
function shr_int16(i ,shift : int16 ) : int16; function shr_int16(i ,shift : int16 ) : int16;
function shr_int32(i ,shift : int32 ) : int32; function shr_int32(i ,shift : int ) : int;
IMPLEMENTATION IMPLEMENTATION
{ UNIT IMPLEMENTATION } { UNIT IMPLEMENTATION }

1
components/aggpas/src/agg_rasterizer_cells_aa.pas
View File

@ -307,7 +307,6 @@ begin
ey2:=shr_int32(y2 ,poly_subpixel_shift ); ey2:=shr_int32(y2 ,poly_subpixel_shift );
fy1:=y1 and poly_subpixel_mask; fy1:=y1 and poly_subpixel_mask;
fy2:=y2 and poly_subpixel_mask; fy2:=y2 and poly_subpixel_mask;
writeln('rasterizer_cells_aa.line x1=',x1,' x2=',x2,' y1=',y1,' y2=',y2,' ex1=',ex1,' ex2=',ex2,' ey1=',ey1,' ey2=',ey1);
if ex1 < m_min_x then if ex1 < m_min_x then
m_min_x:=ex1; m_min_x:=ex1;