paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 18:29:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix compilation failure

Browse Source
This commit is contained in:
pierre 2002-01-30 14:57:11 +00:00
parent fb1f495c62
commit 6165a24c43
1 changed files with 10 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
rtl/win32/system.pp
View File

@ -50,6 +50,12 @@ type
Reserved : DWord;
end;
PEXCEPTION_FRAME = ^TEXCEPTION_FRAME;
TEXCEPTION_FRAME = record
next : PEXCEPTION_FRAME;
handler : pointer;
end;
{ include threading stuff }
{$i threadh.inc}
@ -95,12 +101,6 @@ type
hStdError : longint;
end;
PEXCEPTION_FRAME = ^TEXCEPTION_FRAME;
TEXCEPTION_FRAME = record
next : PEXCEPTION_FRAME;
handler : pointer;
end;
var
{ C compatible arguments }
argc : longint;
@ -1583,7 +1583,10 @@ end.
{
$Log$
Revision 1.23 2002-01-25 16:23:03 peter
Revision 1.24 2002-01-30 14:57:11 pierre
* fix compilation failure
Revision 1.23 2002/01/25 16:23:03 peter
* merged filesearch() fix
Revision 1.22 2001/12/02 17:21:25 peter