mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 07:09:29 +02:00
* fixed memory corruption bug in fpc_help_constructor
This commit is contained in:
parent
95ce60d671
commit
0d606ac980
@ -425,10 +425,15 @@ asm
|
||||
movl %esp,%esi
|
||||
{ Save Register}
|
||||
pushal
|
||||
{$ifdef valuegetmem}
|
||||
{ esi can be destroyed in fpc_getmem!!! (JM) }
|
||||
pushl %esi
|
||||
{$endif valuegetmem}
|
||||
{ Memory size }
|
||||
pushl (%eax)
|
||||
{$ifdef valuegetmem}
|
||||
call fpc_getmem
|
||||
popl %esi
|
||||
movl %eax,(%esi)
|
||||
{$else valuegetmem}
|
||||
pushl %esi
|
||||
@ -1170,7 +1175,10 @@ procedure inclocked(var l : longint);assembler;
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.22 2002-04-21 18:56:59 peter
|
||||
Revision 1.23 2002-06-09 12:54:37 jonas
|
||||
* fixed memory corruption bug in fpc_help_constructor
|
||||
|
||||
Revision 1.22 2002/04/21 18:56:59 peter
|
||||
* fpc_freemem and fpc_getmem compilerproc
|
||||
|
||||
Revision 1.21 2002/04/01 14:23:17 carl
|
||||
|
Loading…
Reference in New Issue
Block a user