Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2008-11

TBufDataset broken in fixes_2_2

6 messages · 4 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Funky Beast

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

Reply by email

Michael Müller
to Funky Beast: TBufDataset is broken in latest fixes_2_2. Can be reproduce with following code: var s:…

Hi!

Funky Beast wrote 9 lines
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()?

Show quoted text 20 lines
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 - http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply by email

Funky Beast
to Michael Müller
Michael Müller wrote 43 lines
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 - > > http://lists.freepascal.org/mailman/listinfo/fpc-pascal _______________________________________________ fpc-pascal maillist - http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Yes, it should be with the .Create(nil) in the actual test code, I accidentally missed it out here writing this mail. See bug report 0012639.

Regards,
Funky Beast

Reply by email