U/d_setlocale.U

   1 ?X:  These units are based on the ones supplied with dist-3.0
   2 ?X:  patchlevel 22.  They have been changed or enhanced to work with
   3 ?X:  perl5alpha.  I would appreciate hearing about any changes,
   4 ?X:  corrections, or enhancements.
   5 ?X:     Andy Dougherty                  doughera@lafcol.lafayette.edu
   6 ?X:     Dept. of Physics
   7 ?X:     Lafayette College
   8 ?X:     Easton, PA  18042-1782
   9 ?X:     Sat Apr  2 15:45:17 EST 1994
  10 ?RCS: $Id: d_setlocale.U,v 3.0 1993/08/18 12:07:36 ram Exp $
  11 ?RCS:
  12 ?RCS: Copyright (c) 1991-1993, Raphael Manfredi
  13 ?RCS:
  14 ?RCS: You may redistribute only under the terms of the Artistic Licence,
  15 ?RCS: as specified in the README file that comes with the distribution.
  16 ?RCS: You may reuse parts of this distribution only within the terms of
  17 ?RCS: that same Artistic Licence; a copy of which may be found at the root
  18 ?RCS: of the source tree for dist 3.0.
  19 ?RCS:
  20 ?RCS: $Log: d_setlocale.U,v $
  21 ?RCS: Revision 3.0  1993/08/18  12:07:36  ram
  22 ?RCS: Baseline for dist 3.0 netwide release.
  23 ?RCS:
  24 ?MAKE:d_setlocale: Inlibc
  25 ?MAKE:  -pick add $@ %<
  26 ?S:d_setlocale:
  27 ?S:     This variable conditionally defines HAS_SETLOCALE if setlocale() is
  28 ?S:     available to handle locale-specific ctype implementations.
  29 ?S:.
  30 ?C:HAS_SETLOCALE:
  31 ?C:     This symbol, if defined, indicates that the setlocale routine is
  32 ?C:     available to handle locale-specific ctype implementations.
  33 ?C:.
  34 ?H:#$d_setlocale HAS_SETLOCALE  /**/
  35 ?H:.
  36 ?LINT:set d_setlocale
  37 : see if setlocale exists
  38 set setlocale d_setlocale
  39 eval $inlibc