pgtypes.pas

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