diff --git a/components/aggpas/src/agg_array.pas b/components/aggpas/src/agg_array.pas
index 5b1204d93d..5106d58bb8 100644
--- a/components/aggpas/src/agg_array.pas
+++ b/components/aggpas/src/agg_array.pas
@@ -705,6 +705,7 @@ end;
 { ZERO }
 procedure pod_array.zero;
 begin
+ writeln('pod_array.zero m_entry_sz=',m_entry_sz,' m_size=',m_size);
  fillchar(m_array^ ,m_entry_sz * m_size ,0 );
 
 end;
diff --git a/components/aggpas/src/agg_fpimage.pas b/components/aggpas/src/agg_fpimage.pas
index c31731ef7b..defd3d769e 100644
--- a/components/aggpas/src/agg_fpimage.pas
+++ b/components/aggpas/src/agg_fpimage.pas
@@ -829,6 +829,7 @@ end;
 
 procedure TAggFPImage.ReallocData;
 begin
+  writeln('TAggFPImage.ReallocData Width=',Width,' Height=',Height,' DataSize=',DataSize);
   ReAllocMem(fData,DataSize);
   RenderingBuffer.Destruct;
   RenderingBuffer.Construct(FData, Width, Height, LineSize);