lib/csu/alpha/crtfm.c

   1 /*      $NetBSD: crtfm.c,v 1.2 2002/01/14 01:31:00 thorpej 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__))
  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 }