tools: fix build with sdl2

[d2df-sdl.git] / src / lib / libjit / libjit.pas

diff --git a/src/lib/libjit/libjit.pas b/src/lib/libjit/libjit.pas
index 8ef405c66919ebcd191f49c50cb4da9ffb76f511..512702ee110c51a211fd0fc5476e113c96e3f661 100644 (file)
--- a/src/lib/libjit/libjit.pas
+++ b/src/lib/libjit/libjit.pas
@@ -18,32 +18,12 @@
  * License along with the libjit library.  If not, see
  * <http://www.gnu.org/licenses/>.
  *)
-unit libjit;
-
-{$IFDEF WIN32}
-  {$DEFINE MSWINDOWS}
-{$ENDIF}
-
 {$MODE DELPHI}
-{$PACKRECORDS C}
-{$MACRO ON}
-
-{$Z4} // Force four-byte enums
+{$INCLUDE libjit_opts.inc}
+unit libjit;
 
 interface
 
-const
-  {$IFDEF MSWINDOWS}
-  LIBJIT_LIBNAME = 'libjit.dll';
-  {$DEFINE libraryLibJITDecl := cdecl}
-  {$DEFINE libraryLibJITImp := cdecl; external LIBJIT_LIBNAME}
-  {$ELSE}
-  LIBJIT_LIBNAME = 'jit';
-  {$DEFINE libraryLibJITDecl := cdecl}
-  {$DEFINE libraryLibJITImp := cdecl; external LIBJIT_LIBNAME}
-  {$ENDIF}
-
-
 type
   jit_sbyte = ShortInt; pjit_sbyte = ^jit_sbyte;
   jit_ubyte = Byte; pjit_ubyte = ^jit_ubyte;
@@ -155,7 +135,7 @@ type jit_on_demand_driver_func = function (func: jit_function_t): Pointer; libra
 function jit_context_create (): jit_context_t; libraryLibJITDecl;
 procedure jit_context_destroy (context: jit_context_t); libraryLibJITDecl;
 
-procedure jit_context_build_start (context: jit_context_t);
+procedure jit_context_build_start (context: jit_context_t); libraryLibJITDecl;
 procedure jit_context_build_end (context: jit_context_t); libraryLibJITDecl;
 
 procedure jit_context_set_on_demand_driver (context: jit_context_t; driver: jit_on_demand_driver_func); libraryLibJITDecl;
@@ -2174,6 +2154,7 @@ Pointer _jit_get_return_address(Pointer frame; Pointer frame0; Pointer return0);
 
 implementation
 
+
 function jit_context_create; libraryLibJITImp;
 procedure jit_context_destroy; libraryLibJITImp;
 procedure jit_context_build_start; libraryLibJITImp;