paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 07:46:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

* cause runtime error 203 on failed class creation

Browse Source
This commit is contained in:
carl 2002-03-30 14:52:04 +00:00
parent 4e782284ba
commit 16b2fe5095
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/i386/i386.inc
View File

@ -644,6 +644,8 @@ asm
xorl %esi,%esi xorl %esi,%esi
movl %esi,8(%ebp) movl %esi,8(%ebp)
.LHFC_1: .LHFC_1:
pushl $203
call HandleError
end; end;
@ -1170,7 +1172,10 @@ procedure inclocked(var l : longint);assembler;
{ {
$Log$ $Log$
Revision 1.19 2001-12-03 21:39:19 peter Revision 1.20 2002-03-30 14:52:04 carl
* cause runtime error 203 on failed class creation
Revision 1.19 2001/12/03 21:39:19 peter
* freemem(var) -> freemem(value) * freemem(var) -> freemem(value)
Revision 1.18 2001/10/09 02:43:58 carl Revision 1.18 2001/10/09 02:43:58 carl