ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/runtime/IBExternals.pas
(Generate patch)

Comparing ibx/trunk/runtime/IBExternals.pas (file contents):
Revision 1 by tony, Mon Jul 31 16:43:00 2000 UTC vs.
Revision 5 by tony, Fri Feb 18 16:26:16 2011 UTC

# Line 33 | Line 33 | unit IBExternals;
33   interface
34  
35   uses
36 <  Windows, IBUtils;
36 > {$IFDEF LINUX }
37 >  unix;
38 > {$ELSE}
39 >  Windows;
40 > {$ENDIF}
41  
42   type
43    Int                  = LongInt; { 32 bit signed }
# Line 47 | Line 51 | type
51    ISC_LONG             = Long;    { 32 bit signed  }
52    UISC_LONG            = ULong;   { 32 bit unsigned }
53    ISC_INT64            = Int64;   { 64 bit signed  }
54 + {$IFDEF CPU64}
55 +  ISC_STATUS           = Int64;   { 64 bit signed }
56 +  UISC_STATUS          = UInt64;   { 64 bit unsigned}
57 + {$ELSE}
58    ISC_STATUS           = Long;    { 32 bit signed }
59    UISC_STATUS          = ULong;   { 32 bit unsigned}
60 + {$ENDIF}
61 +  FB_API_HANDLE        = ^Pointer;
62    Void                 = Pointer;
63    { Delphi Pointer types }
54  PPChar               = ^PChar;
55  PSmallInt            = ^SmallInt;
64    PInt                 = ^Int;
57  PInteger             = ^Integer;
65    PShort               = ^Short;
66    PUShort              = ^UShort;
67    PLong                = ^Long;
# Line 62 | Line 69 | type
69    PFloat               = ^Float;
70    PUChar               = ^UChar;
71    PVoid                = ^Pointer;
65  PDouble              = ^Double;
72    PISC_LONG            = ^ISC_LONG;
73    PUISC_LONG           = ^UISC_LONG;
74    PISC_STATUS          = ^ISC_STATUS;
# Line 80 | Line 86 | type
86      tm_wday : integer;  { Weekday (0--6) Sunday = 0) }
87      tm_yday : integer;  { Day of year (0--365) }
88      tm_isdst : integer; { 0 if daylight savings time is not in effect) }
89 +    tm_gmtoff: longint;
90 +    tm_zone: PChar;
91    end;
92    PCTimeStructure = ^TCTimeStructure;
93    TM              = TCTimeStructure;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines