xref: /csrg-svn/lib/libc/quad/fixdfdi.c (revision 53459)
153436Sbostic /*-
253436Sbostic  * Copyright (c) 1992 The Regents of the University of California.
353436Sbostic  * All rights reserved.
453436Sbostic  *
553436Sbostic  * %sccs.include.redist.c%
653436Sbostic  */
753436Sbostic 
853436Sbostic #if defined(LIBC_SCCS) && !defined(lint)
9*53459Sbostic static char sccsid[] = "@(#)fixdfdi.c	5.2 (Berkeley) 05/12/92";
1053436Sbostic #endif /* LIBC_SCCS and not lint */
1153436Sbostic 
12*53459Sbostic /* Copyright (C) 1989, 1992 Free Software Foundation, Inc.
13*53459Sbostic 
14*53459Sbostic This file is part of GNU CC.
15*53459Sbostic 
16*53459Sbostic GNU CC is free software; you can redistribute it and/or modify
17*53459Sbostic it under the terms of the GNU General Public License as published by
18*53459Sbostic the Free Software Foundation; either version 2, or (at your option)
19*53459Sbostic any later version.
20*53459Sbostic 
21*53459Sbostic GNU CC is distributed in the hope that it will be useful,
22*53459Sbostic but WITHOUT ANY WARRANTY; without even the implied warranty of
23*53459Sbostic MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24*53459Sbostic GNU General Public License for more details.
25*53459Sbostic 
26*53459Sbostic You should have received a copy of the GNU General Public License
27*53459Sbostic along with GNU CC; see the file COPYING.  If not, write to
28*53459Sbostic the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
29*53459Sbostic 
30*53459Sbostic /* As a special exception, if you link this library with files
31*53459Sbostic    compiled with GCC to produce an executable, this does not cause
32*53459Sbostic    the resulting executable to be covered by the GNU General Public License.
33*53459Sbostic    This exception does not however invalidate any other reasons why
34*53459Sbostic    the executable file might be covered by the GNU General Public License.  */
35*53459Sbostic 
3653436Sbostic #include "longlong.h"
3753436Sbostic 
3853436Sbostic long long
3953436Sbostic __fixdfdi (a)
4053436Sbostic      double a;
4153436Sbostic {
4253436Sbostic   long long __fixunsdfdi (double a);
4353436Sbostic 
4453436Sbostic   if (a < 0)
4553436Sbostic     return - __fixunsdfdi (-a);
4653436Sbostic   return __fixunsdfdi (a);
4753436Sbostic }
48