home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c221 / 5.ddi / MWHC.005 / A3 < prev    next >
Encoding:
Text File  |  1992-12-09  |  1.1 KB  |  36 lines

  1. { (C) Copyright  1986-1992 MetaWare Incorporated;  Santa Cruz, CA 95060. }
  2.  
  3. {
  4.    Implementation dependent types and constants
  5.    When routine aliasing prefixes are changed, implement.h must be changed.
  6. }
  7. package Implement;
  8.    with Loopholes:[Address];
  9.  
  10.    const
  11.       RTE             = '_mw'; {Prefix to be applied to all RTE routines}
  12.       RTE_ALIASING         = RTE || '%r';
  13.       GLOBAL_ALIASING_CONVENTION = '%r';
  14.       PLIB_aliasing         = RTE_aliasing;
  15.       Cprefix             = '';
  16.       CLIB_aliasing         = Cprefix || '%r';
  17.       NUL          = Chr(0);
  18.       Horizontal_tab  = Chr(9);
  19.       Linefeed          = Chr(10);
  20.       Vertical_tab    = Chr(11);
  21.       Form_feed       = Chr(12);
  22.       Carriage_return = Chr(13);
  23.       Control_Z       = Chr(26);
  24.    type
  25.       Adrint = Longint;
  26.       Charp = Address(Char);
  27.       -- Change these if necessary when moving to another system.
  28.       -- Usually, Int/Unsigned for Pascal = C's int/unsigned.
  29.       Int = Standard.Int;
  30.       Unsigned_int = Unsigned;
  31.       Byte_count = Unsigned;
  32.       Size_t = Unsigned;
  33.    end;
  34. #define HCLIB (1=1)
  35. #define PPLIB (not HCLIB)
  36.