X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Flib%2Flibjit%2Flibjit.pas;h=512702ee110c51a211fd0fc5476e113c96e3f661;hb=493befdc432063207dc653ff49da645a567567ba;hp=293989389f3de18920766a08339612c12891c277;hpb=cbae21ec24f318616edf5e8054cb33c529782d2e;p=d2df-sdl.git diff --git a/src/lib/libjit/libjit.pas b/src/lib/libjit/libjit.pas index 2939893..512702e 100644 --- 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 * . *) -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; @@ -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;