OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [config/] [alpha/] [crtfastmath.c] - Blame information for rev 820

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 38 julius
/*
2
 * Copyright (C) 2001 Free Software Foundation, Inc.
3
 * Contributed by Richard Henderson (rth@redhat.com)
4
 *
5
 * This file is free software; you can redistribute it and/or modify it
6
 * under the terms of the GNU General Public License as published by the
7
 * Free Software Foundation; either version 2, or (at your option) any
8
 * later version.
9
 *
10
 * In addition to the permissions in the GNU General Public License, the
11
 * Free Software Foundation gives you unlimited permission to link the
12
 * compiled version of this file with other programs, and to distribute
13
 * those programs without any restriction coming from the use of this
14
 * file.  (The General Public License restrictions do apply in other
15
 * respects; for example, they cover modification of the file, and
16
 * distribution when not linked into another program.)
17
 *
18
 * This file is distributed in the hope that it will be useful, but
19
 * WITHOUT ANY WARRANTY; without even the implied warranty of
20
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
21
 * General Public License for more details.
22
 *
23
 * You should have received a copy of the GNU General Public License
24
 * along with this program; see the file COPYING.  If not, write to
25
 * the Free Software Foundation, 51 Franklin Street, Fifth Floor,
26
 * Boston, MA 02110-1301, USA.
27
 *
28
 *    As a special exception, if you link this library with files
29
 *    compiled with GCC to produce an executable, this does not cause
30
 *    the resulting executable to be covered by the GNU General Public License.
31
 *    This exception does not however invalidate any other reasons why
32
 *    the executable file might be covered by the GNU General Public License.
33
 */
34
 
35
/* Assume OSF/1 compatible interfaces.  */
36
 
37
extern void __ieee_set_fp_control (unsigned long int);
38
 
39
#define IEEE_MAP_DMZ  (1UL<<12)       /* Map denorm inputs to zero */
40
#define IEEE_MAP_UMZ  (1UL<<13)       /* Map underflowed outputs to zero */
41
 
42
static void __attribute__((constructor))
43
set_fast_math (void)
44
{
45
  __ieee_set_fp_control (IEEE_MAP_DMZ | IEEE_MAP_UMZ);
46
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.