1 1.1 cherry /* 2 1.1 cherry * Copyright (c) 2003 Marcel Moolenaar 3 1.1 cherry * All rights reserved. 4 1.1 cherry * 5 1.1 cherry * Redistribution and use in source and binary forms, with or without 6 1.1 cherry * modification, are permitted provided that the following conditions 7 1.1 cherry * are met: 8 1.1 cherry * 9 1.1 cherry * 1. Redistributions of source code must retain the above copyright 10 1.1 cherry * notice, this list of conditions and the following disclaimer. 11 1.1 cherry * 2. Redistributions in binary form must reproduce the above copyright 12 1.1 cherry * notice, this list of conditions and the following disclaimer in the 13 1.1 cherry * documentation and/or other materials provided with the distribution. 14 1.1 cherry * 15 1.1 cherry * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 1.1 cherry * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17 1.1 cherry * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 1.1 cherry * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 1.1 cherry * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20 1.1 cherry * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21 1.1 cherry * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22 1.1 cherry * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 1.1 cherry * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24 1.1 cherry * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 1.1 cherry * 26 1.1 cherry * $FreeBSD: src/lib/libc/ia64/gen/fpgetround.c,v 1.1 2003/01/11 07:24:54 marcel Exp $ 27 1.1 cherry */ 28 1.1 cherry 29 1.1 cherry #include <sys/types.h> 30 1.1 cherry #include <ieeefp.h> 31 1.1 cherry 32 1.1 cherry fp_rnd 33 1.1 cherry fpgetround(void) 34 1.1 cherry { 35 1.1 cherry uint64_t fpsr; 36 1.1 cherry 37 1.1 cherry __asm __volatile("mov %0=ar.fpsr" : "=r"(fpsr)); 38 1.1 cherry return ((fp_rnd)((fpsr >> 10) & 3)); 39 1.1 cherry } 40