1*f5094284SDan McDonald /* 2*f5094284SDan McDonald * CDDL HEADER START 3*f5094284SDan McDonald * 4*f5094284SDan McDonald * The contents of this file are subject to the terms of the 5*f5094284SDan McDonald * Common Development and Distribution License (the "License"). 6*f5094284SDan McDonald * You may not use this file except in compliance with the License. 7*f5094284SDan McDonald * 8*f5094284SDan McDonald * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9*f5094284SDan McDonald * or http://www.opensolaris.org/os/licensing. 10*f5094284SDan McDonald * See the License for the specific language governing permissions 11*f5094284SDan McDonald * and limitations under the License. 12*f5094284SDan McDonald * 13*f5094284SDan McDonald * When distributing Covered Code, include this CDDL HEADER in each 14*f5094284SDan McDonald * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15*f5094284SDan McDonald * If applicable, add the following below this CDDL HEADER, with the 16*f5094284SDan McDonald * fields enclosed by brackets "[]" replaced with your own identifying 17*f5094284SDan McDonald * information: Portions Copyright [yyyy] [name of copyright owner] 18*f5094284SDan McDonald * 19*f5094284SDan McDonald * CDDL HEADER END 20*f5094284SDan McDonald */ 21*f5094284SDan McDonald 22*f5094284SDan McDonald /* 23*f5094284SDan McDonald * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 24*f5094284SDan McDonald * Use is subject to license terms. 25*f5094284SDan McDonald */ 26*f5094284SDan McDonald 27*f5094284SDan McDonald #include "lint.h" 28*f5094284SDan McDonald #include "base_conversion.h" 29*f5094284SDan McDonald #include <sys/isa_defs.h> 30*f5094284SDan McDonald 31*f5094284SDan McDonald #define CSR_DEFAULT 0x1f80 32*f5094284SDan McDonald 33*f5094284SDan McDonald /* 34*f5094284SDan McDonald * Returns IEEE mode/status and 35*f5094284SDan McDonald * sets up standard environment for base conversion. 36*f5094284SDan McDonald */ 37*f5094284SDan McDonald void __get_ieee_flags(__ieee_flags_type * b)38*f5094284SDan McDonald__get_ieee_flags(__ieee_flags_type *b) { 39*f5094284SDan McDonald extern void _getmxcsr(), _putmxcsr(); 40*f5094284SDan McDonald 41*f5094284SDan McDonald _getmxcsr(&b->status); 42*f5094284SDan McDonald 43*f5094284SDan McDonald /* round-to-nearest, all exceptions masked, gradual underflow */ 44*f5094284SDan McDonald _putmxcsr(CSR_DEFAULT); 45*f5094284SDan McDonald } 46*f5094284SDan McDonald 47*f5094284SDan McDonald /* 48*f5094284SDan McDonald * Restores previous IEEE mode/status 49*f5094284SDan McDonald */ 50*f5094284SDan McDonald void __set_ieee_flags(__ieee_flags_type * b)51*f5094284SDan McDonald__set_ieee_flags(__ieee_flags_type *b) { 52*f5094284SDan McDonald extern void _putmxcsr(); 53*f5094284SDan McDonald 54*f5094284SDan McDonald _putmxcsr(b->status); 55*f5094284SDan McDonald } 56