DEADSOFTWARE

moved FlexUI fonts to "flexui.wad"
[d2df-sdl.git] / src / lib / libjit / libjit_types.pas
index f6d997d55ee6a7199171385e3885bc647e6044f3..6791939b264bf4f872cbfe527daa7af3c98200d9 100644 (file)
@@ -35,6 +35,8 @@ interface
 uses
   libjit;
 
+//LIBJIT_LIBNAME = 'libjit.dll';
+{$IF not DEFINED(MSWINDOWS)}
 (*const*) var jit_opcodes: packed array [0..JIT_OP_NUM_OPCODES-1] of jit_opcode_info_t; cvar; external LIBJIT_LIBNAME;
 
 (*
@@ -76,6 +78,54 @@ uses
 (*const*) var jit_type_sys_double: jit_type_t; cvar; external LIBJIT_LIBNAME;
 (*const*) var jit_type_sys_long_double: jit_type_t; cvar; external LIBJIT_LIBNAME;
 
+{$ELSE}
+
+{ external LIBNAME name 'var_name' would've been more correct here }
+{ because just external is case insensitive, but fuck it           }
+
+(*const*) var jit_opcodes: packed array [0..JIT_OP_NUM_OPCODES-1] of jit_opcode_info_t; external LIBJIT_LIBNAME;
+
+(*
+ * Pre-defined type descriptors.
+ *)
+(*const*) var jit_type_void: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sbyte: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_ubyte: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_short: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_ushort: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_int: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_uint: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_nint: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_nuint: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_long: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_ulong: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_float32: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_float64: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_nfloat: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_void_ptr: jit_type_t; external LIBJIT_LIBNAME;
+
+(*
+ * Type descriptors for the system "char", "int", "long", etc types.
+ * These are defined to one of the above values.
+ *)
+(*const*) var jit_type_sys_bool: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_char: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_schar: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_uchar: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_short: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_ushort: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_int: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_uint: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_long: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_ulong: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_longlong: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_ulonglong: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_float: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_double: jit_type_t; external LIBJIT_LIBNAME;
+(*const*) var jit_type_sys_long_double: jit_type_t; external LIBJIT_LIBNAME;
+
+{$ENDIF}
+
 
 implementation