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

* enable Invoke() tests for i386

Browse Source 
git-svn-id: trunk@41537 -
This commit is contained in:
svenbarth 2019-03-01 15:21:01 +00:00
parent d7bb4bd411
commit 42d126e713
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl-objpas/tests/testrunner.rtlobjpas.pp
View File

@ -8,6 +8,8 @@ program testrunner.rtlobjpas;
{.$define useffi} {.$define useffi}
{$if defined(CPUX64) and defined(WINDOWS)} {$if defined(CPUX64) and defined(WINDOWS)}
{$define testinvoke} {$define testinvoke}
{$elseif defined(CPUI386)}
{$define testinvoke}
{$else} {$else}
{$ifdef useffi} {$ifdef useffi}
{$define testinvoke} {$define testinvoke}