|
@@ -229,8 +229,7 @@ implementation
|
|
|
movl %eax,24(%edi)
|
|
movl %eax,24(%edi)
|
|
|
|
|
|
|
|
{ esp ... }
|
|
{ esp ... }
|
|
|
- movl %esp,%eax
|
|
|
|
|
- addl $12,%eax
|
|
|
|
|
|
|
+ leal 12(%ebp),%eax
|
|
|
movl %eax,28(%edi)
|
|
movl %eax,28(%edi)
|
|
|
|
|
|
|
|
{ the return address }
|
|
{ the return address }
|
|
@@ -352,7 +351,10 @@ implementation
|
|
|
end.
|
|
end.
|
|
|
{
|
|
{
|
|
|
$Log$
|
|
$Log$
|
|
|
- Revision 1.7 1999-07-18 14:47:36 florian
|
|
|
|
|
|
|
+ Revision 1.8 1999-08-18 11:35:59 pierre
|
|
|
|
|
+ * esp loading corrected
|
|
|
|
|
+
|
|
|
|
|
+ Revision 1.7 1999/07/18 14:47:36 florian
|
|
|
* bug 487 fixed, (inc(<property>) isn't allowed)
|
|
* bug 487 fixed, (inc(<property>) isn't allowed)
|
|
|
* more fixes to compile with Delphi
|
|
* more fixes to compile with Delphi
|
|
|
|
|
|
pierre