Hi,

TBufDataset is broken in latest fixes_2_2.

Can be reproduce with following code:

var s: TSQLQuery;
begin
 s := TSQLQuery;
 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

Reply via email to