Sign in Join

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

Mailing lists / fpc-pascal / 2004-05

Bug in cmem?

2 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

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

Vincent Snijders

Hi,

I think there is a bug in the CReAllocMem function in cmem.

Index: rtl/inc/cmem.pp
=================================================================== RCS file: /FPC/CVS/fpc/rtl/inc/cmem.pp,v
retrieving revision 1.4
diff -r1.4 cmem.pp
91,92c91,92
< dec(size,sizeof(ptrint));
< free(p);
---

dec(p,sizeof(ptrint)); Free(p);

The bug is in the first line; and while you are at it: Free is written like this throughout the rest of the unit.

Regards,
Vincent Snijders.
###########################################

This message has been scanned by F-Secure Anti-Virus for Microsoft Exchange.
For more information, connect to http://www.F-Secure.com/