U/perl/d_llrintl.U

   1 ?RCS: You may distribute under the terms of either the GNU General Public
   2 ?RCS: License or the Artistic License, as specified in the README file.
   3 ?RCS:
   4 ?MAKE:d_llrintl: Inlibc
   5 ?MAKE:  -pick add $@ %<
   6 ?S:d_llrintl:
   7 ?S:     This variable conditionally defines the HAS_LLRINTL symbol, which
   8 ?S:     indicates to the C program that the llrintl() routine is available
   9 ?S:     to return the long long value closest to a long double (according
  10 ?S:     to the current rounding mode).
  11 ?S:.
  12 ?C:HAS_LLRINTL:
  13 ?C:     This symbol, if defined, indicates that the llrintl routine is
  14 ?C:     available to return the long long value closest to a long double
  15 ?C:     (according to the current rounding mode).
  16 ?C:.
  17 ?H:#$d_llrintl HAS_LLRINTL              /**/
  18 ?H:.
  19 ?LINT:set d_llrintl
  20 : see if llrintl exists
  21 set llrintl d_llrintl
  22 eval $inlibc
  23