VirtualBox

source: vbox/trunk/src/VBox/Runtime/common/math/llroundl.cpp@ 96282

Last change on this file since 96282 was 96214, checked in by vboxsync, 2 years ago

IPRT/nocrt: l[l]round[fl] can now raise FE_INVALID as they ought to. bugref:10216

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 2.1 KB
Line 
1/* $Id: llroundl.cpp 96214 2022-08-15 09:46:25Z vboxsync $ */
2/** @file
3 * IPRT - No-CRT - llroundl().
4 */
5
6/*
7 * Copyright (C) 2022 Oracle Corporation
8 *
9 * This file is part of VirtualBox Open Source Edition (OSE), as
10 * available from http://www.virtualbox.org. This file is free software;
11 * you can redistribute it and/or modify it under the terms of the GNU
12 * General Public License (GPL) as published by the Free Software
13 * Foundation, in version 2 as it comes in the "COPYING" file of the
14 * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15 * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16 *
17 * The contents of this file may alternatively be used under the terms
18 * of the Common Development and Distribution License Version 1.0
19 * (CDDL) only, as it comes in the "COPYING.CDDL" file of the
20 * VirtualBox OSE distribution, in which case the provisions of the
21 * CDDL are applicable instead of those of the GPL.
22 *
23 * You may elect to license modified versions of this file under the
24 * terms and conditions of either the GPL or the CDDL or both.
25 */
26
27
28/*********************************************************************************************************************************
29* Header Files *
30*********************************************************************************************************************************/
31#define IPRT_NO_CRT_FOR_3RD_PARTY
32#include "internal/nocrt.h"
33#include <iprt/nocrt/math.h>
34#include <iprt/nocrt/limits.h>
35#include <iprt/nocrt/fenv.h>
36
37
38#undef llroundl
39long long RT_NOCRT(llroundl)(long double lrd)
40{
41 if (isfinite(lrd))
42 {
43 lrd = RT_NOCRT(roundl)(lrd);
44 if (lrd >= (long double)LLONG_MIN && lrd <= (long double)LLONG_MAX)
45 return (long long)lrd;
46 RT_NOCRT(feraiseexcept)(FE_INVALID);
47 return lrd > 0.0L ? LLONG_MAX : LLONG_MIN;
48 }
49 RT_NOCRT(feraiseexcept)(FE_INVALID);
50 if (RT_NOCRT(__isinfl)(lrd) && lrd < 0.0)
51 return LLONG_MIN;
52 return LLONG_MAX;
53}
54RT_ALIAS_AND_EXPORT_NOCRT_SYMBOL(llroundl);
55
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette