gnu/dist/groff/src/libs/libgroff/hypot.cpp

   1 /*      $NetBSD$        */
   2
   3 /* Copyright (C) 2005 Free Software Foundation, Inc.
   4 This file is part of the GNU C Library.
   5
   6 The GNU C Library is free software; you can redistribute it and/or
   7 modify it under the terms of the GNU Library General Public License as
   8 published by the Free Software Foundation; either version 2 of the
   9 License, or (at your option) any later version.
  10
  11 The GNU C Library is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 Library General Public License for more details.
  15
  16 You should have received a copy of the GNU Library General Public
  17 License along with the GNU C Library; see the file COPYING.LIB.  If
  18 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  19 Cambridge, MA 02139, USA.  */
  20
  21 #ifdef HAVE_CONFIG_H
  22 #include <config.h>
  23 #endif
  24
  25 #include <math.h>
  26
  27 #ifdef NEED_DECLARATION_HYPOT
  28   double hypot(double, double);
  29 #endif /* NEED_DECLARATION_HYPOT */
  30
  31 double groff_hypot(double x, double y)
  32 {
  33   double result = hypot(x, y);
  34
  35 #ifdef __INTERIX
  36   /* hypot() on Interix is broken */
  37   if (isnan(result) && !isnan(x) && !isnan(y))
  38     return 0.0;
  39 #endif
  40
  41   return result;
  42 }