13cab2bb3Spatrick //===----- lib/i386/fp_mode.c - Floaing-point mode utilities -----*- C -*-====// 23cab2bb3Spatrick // 33cab2bb3Spatrick // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 43cab2bb3Spatrick // See https://llvm.org/LICENSE.txt for license information. 53cab2bb3Spatrick // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 63cab2bb3Spatrick // 73cab2bb3Spatrick //===----------------------------------------------------------------------===// 83cab2bb3Spatrick 93cab2bb3Spatrick #include "../fp_mode.h" 103cab2bb3Spatrick 113cab2bb3Spatrick #define X87_TONEAREST 0x0000 123cab2bb3Spatrick #define X87_DOWNWARD 0x0400 133cab2bb3Spatrick #define X87_UPWARD 0x0800 143cab2bb3Spatrick #define X87_TOWARDZERO 0x0c00 153cab2bb3Spatrick #define X87_RMODE_MASK (X87_TONEAREST | X87_UPWARD | X87_DOWNWARD | X87_TOWARDZERO) 163cab2bb3Spatrick __fe_getround(void)17*810390e3SrobertCRT_FE_ROUND_MODE __fe_getround(void) { 183cab2bb3Spatrick // Assume that the rounding mode state for the fpu agrees with the SSE unit. 193cab2bb3Spatrick unsigned short cw; 203cab2bb3Spatrick __asm__ __volatile__ ("fnstcw %0" : "=m" (cw)); 213cab2bb3Spatrick 223cab2bb3Spatrick switch (cw & X87_RMODE_MASK) { 233cab2bb3Spatrick case X87_TONEAREST: 24d89ec533Spatrick return CRT_FE_TONEAREST; 253cab2bb3Spatrick case X87_DOWNWARD: 26d89ec533Spatrick return CRT_FE_DOWNWARD; 273cab2bb3Spatrick case X87_UPWARD: 28d89ec533Spatrick return CRT_FE_UPWARD; 293cab2bb3Spatrick case X87_TOWARDZERO: 30d89ec533Spatrick return CRT_FE_TOWARDZERO; 313cab2bb3Spatrick } 32d89ec533Spatrick return CRT_FE_TONEAREST; 333cab2bb3Spatrick } 343cab2bb3Spatrick __fe_raise_inexact(void)35*810390e3Srobertint __fe_raise_inexact(void) { 363cab2bb3Spatrick float f = 1.0f, g = 3.0f; 373cab2bb3Spatrick __asm__ __volatile__ ("fdivs %1" : "+t" (f) : "m" (g)); 383cab2bb3Spatrick return 0; 393cab2bb3Spatrick } 40