[fpc-pascal]heaptrc

[Vincent Snijders]

Marcel Martin wrote:
> Hello,
> 
> I am using fpc 1.9.5 (2004/09/15).
> 
> There is a problem with the unit heaptrc and the routine
> Reallocmem. For instance
> 
>   var p : PLongword;
> 
>   Reallocmem(p,1000*4);
>   ...
>   Reallocmem(p,200*4); <- this instruction upset heaptrc
> 
> Does the problem come from Reallocmem or from the heaptrc unit?
I am having some problems with heaptrc and reallocmem too. Using your 
example I could reproduce it in a 3 line program (instead of lazarus).

Reallocmem moved all the data (4000 bytes in your example) to a space of 
size 800. Of course this is a bug. It is like likely that the old heap 
manager could resize memory in the same block and thus didn't need to move.
Attached patch solved this issue for me. Can it be applied, or do I need 
to submit a bug report (with sample prog) for it too?

Regards,
Vincent.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: diff-heaptrc.zip
Type: application/x-zip-compressed
Size: 630 bytes
Desc: not available
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20040921/f446fed6/attachment.bin>