paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 13:59:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

Object finalization data fixed

Browse Source
This commit is contained in:
michael 1999-07-31 22:27:28 +00:00
parent ab7c74f60a
commit 344a35fec1
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/i386/rttip.inc
View File

@ -35,6 +35,7 @@ asm
decb %al
jz .LDoRecordInit
decb %al
jz .LDoClassInit
decb %al
jz .LDoObjectInit
decb %al
@ -126,6 +127,7 @@ asm
decb %al
jz .LDoRecordFinal
decb %al
jz .LDoClassFinal
decb %al
jz .LDoObjectFinal
decb %al
@ -218,6 +220,7 @@ asm
decb %al
jz .LDoRecordAddRef
decb %al
jz .LDoClassAddRef
decb %al
jz .LDoObjectAddRef
decb %al
@ -303,6 +306,7 @@ asm
decb %al
jz .LDoRecordDecRef
decb %al
jz .LDoClassDecRef
decb %al
jz .LDoObjectDecRef
decb %al
@ -371,7 +375,10 @@ end;
{
$Log$
Revision 1.16 1999-03-01 15:40:58 peter
Revision 1.17 1999-07-31 22:27:28 michael
Object finalization data fixed
Revision 1.16 1999/03/01 15:40:58 peter
* use external names
* removed all direct assembler modes