Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread ik
On Sun, Dec 18, 2011 at 19:39, Michael Van Canneyt wrote: > > > On Sun, 18 Dec 2011, ik wrote: > > Hello, >> >> I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. >> >> I've written the following code: >> >> --- >> uses fpjson, jsonparser, SysUtils, classes; >> >> var >>

Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread ik
On Sun, Dec 18, 2011 at 22:27, Frank Church wrote: > > > On 18 December 2011 17:34, silvioprog wrote: > >> 2011/12/18 ik : >> > Hello, >> > >> > I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. >> > >> > I've written the following code: >> >> Use: >> >> var >> parser: TJSONParser; >> js

Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread Frank Church
On 18 December 2011 17:34, silvioprog wrote: > 2011/12/18 ik : > > Hello, > > > > I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. > > > > I've written the following code: > > Use: > > var > parser: TJSONParser; > json_data: TJSONData; > json_file: TFileStream; > begin > json_file := T

Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread ik
On Sun, Dec 18, 2011 at 19:34, silvioprog wrote: > 2011/12/18 ik : > > Hello, > > > > I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. > > > > I've written the following code: > > Use: > > var > parser: TJSONParser; > json_data: TJSONData; > json_file: TFileStream; > begin > json_file

Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread Michael Van Canneyt
On Sun, 18 Dec 2011, ik wrote: Hello, I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. I've written the following code: --- uses fpjson, jsonparser, SysUtils, classes; var   parser    : TJSONParser;   json_file : TFileStream;  begin   json_file := TFileStream.Cr

Re: [fpc-pascal] possible json parser memory leak

2011-12-18 Thread silvioprog
2011/12/18 ik : > Hello, > > I'm using FPC 2.6 (rc) x86_64 on Linux with JSONParser. > > I've written the following code: Use: var parser: TJSONParser; json_data: TJSONData; json_file: TFileStream; begin json_file := TFileStream.Create('test.json', fmOpenRead); parser := TJSONParser.Cre