Hi!

Am 15.11.2008 um 16:56 schrieb Funky Beast:

Hi,

TBufDataset is broken in latest fixes_2_2.

Can be reproduce with following code:

var s: TSQLQuery;
begin
 s := TSQLQuery;

The example is correct without .Create()?

 s.Free;
end;

Compiling fcl-db with debug info, the above code excepts
at TBufDataset.Destroy destructor at the following position:

For I:=0 to Length(FIndexes)-1 do
    FreeAndNil(Findexes[I]);

It stops at the FreeAndNil line.

Latest trunk 2.3.1 has no such problem.

Should I file a bug report?

Regards,
Funky Beast
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to