git-svn-id: trunk@39895 -
@@ -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
+ ffi.manager,
consoletestrunner,
{$ifdef testinvoke}
tests.rtti.invoke,