dist/U/d_perror.U

   1 ?RCS: $Id: d_perror.U 1 2006-08-24 12:32:52Z rmanfredi $
   2 ?RCS:
   3 ?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
   4 ?RCS:
   5 ?RCS: You may redistribute only under the terms of the Artistic Licence,
   6 ?RCS: as specified in the README file that comes with the distribution.
   7 ?RCS: You may reuse parts of this distribution only within the terms of
   8 ?RCS: that same Artistic Licence; a copy of which may be found at the root
   9 ?RCS: of the source tree for dist 4.0.
  10 ?RCS:
  11 ?RCS: $Log: d_perror.U,v $
  12 ?RCS: Revision 3.0.1.1  1994/08/29  16:11:38  ram
  13 ?RCS: patch32: always define HAS_PERROR even when not used in C code
  14 ?RCS:
  15 ?RCS: Revision 3.0  1993/08/18  12:06:45  ram
  16 ?RCS: Baseline for dist 3.0 netwide release.
  17 ?RCS:
  18 ?MAKE:d_perror: Inlibc
  19 ?MAKE:  -pick add $@ %<
  20 ?S:d_perror:
  21 ?S:     This variable conditionally remaps perror to a null action and
  22 ?S:     defines the symbol HAS_PERROR, which indicates to the C program
  23 ?S:     that the perror() routine is not available to print system
  24 ?S:     error messages.
  25 ?S:.
  26 ?C:HAS_PERROR ~ %<:
  27 ?C:     This symbol, if defined, indicates that the perror() routine is
  28 ?C:     available to print system error messages. If not defined, you should
  29 ?C:     use your own diagnostic routine...
  30 ?C:.
  31 ?C:perror ~ %<:
  32 ?C:     This symbol is maped to null if the  perror() routine is not
  33 ?C:     available to print system error messages.
  34 ?C:.
  35 ?H:?%<:#$d_perror HAS_PERROR    /**/
  36 ?H:?%<:#ifndef HAS_PERROR
  37 ?H:?%<:#define perror(s)        ;               /* mapped to a null statement */
  38 ?H:?%<:#endif
  39 ?H:.
  40 ?LINT:set d_perror
  41 : see if perror exists
  42 set perror d_perror
  43 eval $inlibc
  44