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

Diff of /trunk/pgtypes.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 106 by zipplet, Tue Feb 16 22:51:30 2010 UTC revision 107 by beware, Fri Nov 25 04:36:29 2011 UTC
# Line 7  Line 7 
7    
8  unit pgtypes;  unit pgtypes;
9  interface  interface
10    
11    {$include pgtypes.inc}
12    
13    type    type
     {$ifdef cpu386}{$define i386}{$endif}  
14      {$ifdef i386}      {$ifdef i386}
15        taddrint=longint;        taddrint=longint;
16      {$else}      {$else}
# Line 21  Line 23 
23      { string type for storing data (bytes) }      { string type for storing data (bytes) }
24      tbufferstring = ansistring;      tbufferstring = ansistring;
25    
26        {another name for a string with bytes, not implying it's to be used for a buffer}
27        bytestring = tbufferstring;
28    
29        {a char that is always one byte}
30        bytechar = ansichar;
31    
32  implementation  implementation
33  end.  end.

Legend:
Removed from v.106  
changed lines
  Added in v.107

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