/[lcore]/trunk/pgtypes.pas
ViewVC logotype

Contents of /trunk/pgtypes.pas

Parent Directory Parent Directory | Revision Log Revision Log


Revision 153 - (show annotations)
Sat Apr 21 00:06:32 2018 UTC (7 months ago) by beware
File size: 954 byte(s)
compile on 64 bits delphi
1 {io core originally for linux bworld}
2
3 { Copyright (C) 2005 Bas Steendijk and Peter Green
4 For conditions of distribution and use, see copyright notice in zlib_license.txt
5 which is included in the package
6 ----------------------------------------------------------------------------- }
7
8 unit pgtypes;
9 interface
10
11 {$include pgtypes.inc}
12
13 type
14 {$ifdef i386}
15 taddrint=longint;
16 {$else}
17 {$ifdef cpux64}
18 taddrint=int64;
19 {$else}
20 taddrint=sizeint;
21 {$endif}
22 {$endif}
23 paddrint=^taddrint;
24
25 { string type for storing hostnames or IP addresses as strings }
26 thostname = ansistring;
27 { string type for storing data (bytes) }
28 tbufferstring = ansistring;
29
30 {another name for a string with bytes, not implying it's to be used for a buffer}
31 bytestring = tbufferstring;
32
33 {a char that is always one byte}
34 bytechar = ansichar;
35
36 implementation
37 end.

Properties

Name Value
svn:eol-style CRLF

No admin address has been configured">No admin address has been configured
ViewVC Help
Powered by ViewVC 1.1.22