/contrib/groff/src/libs/libgroff/hypot.cpp

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