Browse Source

* enable Invoke() tests for i386

git-svn-id: trunk@41537 -
svenbarth 6 năm trước cách đây
mục cha
commit
42d126e713
1 tập tin đã thay đổi với 2 bổ sung0 xóa
  1. 2 0
      packages/rtl-objpas/tests/testrunner.rtlobjpas.pp

+ 2 - 0
packages/rtl-objpas/tests/testrunner.rtlobjpas.pp

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