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

Disable i386 assembler code if position independent code option is used

Browse Source 
git-svn-id: trunk@38126 -
This commit is contained in:
pierre 2018-02-06 09:41:40 +00:00
parent a29f968b3b
commit 30e4988a4e
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
packages/hermes/src/hermes.pp
View File

@ -55,6 +55,14 @@ unit Hermes;
{$ENDIF}
interface
{$IF defined(cpui386) and defined(FPC_PIC)}
{ FPC_PIC is only set after parsing _INTERFFACE keyword
so we need to delay the test to here }
{ the i386 assembler code is not prepared for PIC code }
{$DEFINE noassembler}
{ Thus, disable assembler code in that case for now }
{$UNDEF I386_ASSEMBLER}
{$ENDIF}
const
HERMES_CONVERT_NORMAL = 0;