1 /* $NetBSD: crtfm.c,v 1.1 2013/08/05 13:38:35 matt Exp $ */
2
3 /*
4 * Copyright (c) 2002 Wasabi Systems, Inc.
5 * All rights reserved.
6 *
7 * Written by Jason R. Thorpe for Wasabi Systems, Inc.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed for the NetBSD Project by
20 * Wasabi Systems, Inc.
21 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 * or promote products derived from this software without specific prior
23 * written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 * POSSIBILITY OF SUCH DAMAGE.
36 */
37
38 /*
39 * Support for the GCC "-ffast-math" option on the Alpha.
40 */
41
42 #include <sys/types.h>
43
44 #include <machine/fpu.h>
45 #include <machine/sysarch.h>
46
47 /*
48 * Must provide this wrapper around sysarch(2) so that statically-linked
49 * programs work properly.
50 */
51
52 extern void __alpha_sysarch(int, void *);
53
54 __asm(".ent __alpha_sysarch 0 ;\n"
55 "__alpha_sysarch: ;\n"
56 " ldiq $0, 165 ;\n" /* v0 = SYS_sysarch */
57 " call_pal 0x0083 ;\n" /* PAL_OSF1_callsys */
58 " ret $31,($26),1 ;\n"
59 ".end __alpha_sysarch");
60
61 static void __attribute__((__constructor__))
__alpha_set_fast_math(void)62 __alpha_set_fast_math(void)
63 {
64 struct alpha_fp_c_args args;
65
66 args.fp_c = IEEE_MAP_DMZ|IEEE_MAP_UMZ;
67 __alpha_sysarch(ALPHA_SET_FP_C, &args);
68 }
69