@@ -1,15 +1,13 @@
unit x;
interface
+uses
+ ctypes;
{$ifndef os2}
{$LinkLib c}
{$LinkLib X11}
{$endif}
-type
- culong = dword;
- cuchar = byte;
-
{
Automatically converted by H2Pas 0.99.15 from x.h
The following command line parameters were used:
@@ -23,14 +21,8 @@ type
{ Pointers to basic pascal types, inserted by h2pas conversion program.}
Type
- PLongint = ^Longint;
PPLongint = ^PLongint;
- PSmallInt = ^SmallInt;
- PByte = ^Byte;
PPByte = ^PByte;
- PWord = ^Word;
- PDWord = ^DWord;
- PDouble = ^Double;
PPChar = ^PChar;
PPPChar = ^PPChar;
PPWideChar = ^PWideChar;
@@ -2,7 +2,7 @@ unit xlib;
{$mode objfpc}
uses
- x;
+ ctypes,x;
{$define MACROS}
@@ -16,25 +16,8 @@ const
type
- culong = sizeuint;
- clong = sizeint;
- cint = longint;
- cuint = longword;
- cshort = smallint;
- cushort = word;
- cunsigned = cuint;
- cchar = shortint;
- Pcint = ^cint;
- Pcuint = ^cuint;
- Pculong = ^culong;
- Pcuchar = ^cuchar;
PPcint = ^Pcint;
PPcuchar = ^Pcuchar;
Automatically converted by H2Pas 0.99.15 from xlib.h