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

amicommon: make sure to reset packrecords to default after OS structure inclusion

Browse Source 
git-svn-id: trunk@44344 -
This commit is contained in:
Károly Balogh 2020-03-23 01:13:13 +00:00
parent cd76003b4d
commit 65330f346d
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/amicommon/sysos.inc
View File

@ -44,6 +44,8 @@
System Dependent Structures/Consts System Dependent Structures/Consts
*****************************************************************************} *****************************************************************************}
{$packrecords default}
{$ifndef FPC_SYSTEM_HAS_STACKTOP} {$ifndef FPC_SYSTEM_HAS_STACKTOP}
{$define FPC_SYSTEM_HAS_STACKTOP} {$define FPC_SYSTEM_HAS_STACKTOP}
function StackTop: pointer; function StackTop: pointer;