[Lazarus-es] Sobre error al compilar Lazarus SVN

[Jesus Reyes]

--- El mié 29-feb-12, José Mejuto <joshyfun en gmail.com> escribió:

> De: José Mejuto <joshyfun en gmail.com>
> Asunto: Re: [Lazarus-es] Sobre error al compilar Lazarus SVN
> A: "Spanish version of Lazarus List" <lazarus-es en lists.lazarus.freepascal.org>
> Fecha: miércoles, 29 de febrero de 2012, 3:11
> Hello Abraham,
> 
> Wednesday, February 29, 2012, 3:46:43 AM, you wrote:
> 
> A> Alguno de ustedes usa la version fpc-svn y
> lazarus-svn, me podrían decir
> A> como resolvieron el erro al compilar lazarus?, salta
> las lineas siguientes.
> A> Compiling grids.pas
> A> Compiling dynamicarray.pas
> A> Compiling .\widgetset\wsgrids.pp
> A> dbgrids.pas(1991,31) Error: Incompatible types: got
> "Pointer" expected
> A> "AnsiString"
> [...]
> A> vi que ya estaba reportado pero hasta ahora cada vez
> que hago un actualizar
> A> al svn y compilo no veo solución a ese bug.
> 
> Por ahora creo que no hay solución. Lo que puedes hacer es
> volver el
> fpc 2.7.1 a una revisión que compile el wsgrids.pp, yo uso
> la 20370 y
> compilo Lazarus SVN perfectamente.
> 
> -- 
> Best regards,
>  José
> 

Este problema se ha solucionado en la revision 35643.... Aunque, para estar mejor actualizados se tendria que aplicar un pequeño parche a fpc, esto soluciona un problema de fuga de memoria.


Index: src/base/dataset.inc
===================================================================
--- src/base/dataset.inc	(revisi�n: 20450)
+++ src/base/dataset.inc	(copia de trabajo)
@@ -1635,7 +1635,10 @@
     // 1-apr-06, JvdS: It just sets the bookmark of the newly inserted record to the place
     // where the record should be inserted. So it is ok.
     if FRecordcount > 0 then
+      begin
       SetBookMarkData(ActiveBuffer,pointer(BookBeforeInsert));
+      FreeBookmark(BookBeforeInsert);
+      end;
     end;
 
   InternalInsert;


Saludos.

Jesus Reyes A.