Explorar el Código

+ add define to use ffi function call manager for tests

git-svn-id: trunk@39895 -
svenbarth hace 7 años
padre
commit
509383aeb3
Se han modificado 1 ficheros con 7 adiciones y 1 borrados
  1. 7 1
      packages/rtl-objpas/tests/testrunner.rtlobjpas.pp

+ 7 - 1
packages/rtl-objpas/tests/testrunner.rtlobjpas.pp

@@ -5,9 +5,15 @@ program testrunner.rtlobjpas;
 
 {$mode objfpc}{$H+}
 { Invoke needs a function call manager }
-{.$define testinvoke}
+{.$define useffi}
+{$ifdef useffi}
+{$define testinvoke}
+{$endif}
 
 uses
+{$ifdef useffi}
+  ffi.manager,
+{$endif}
   consoletestrunner,
 {$ifdef testinvoke}
   tests.rtti.invoke,