xref: /llvm-project/flang/runtime/Float128Math/nearbyint.cpp (revision 936142e0e77902802005e2129cd8389059d849fd)
1*936142e0Svdonaldson //===-- runtime/Float128Math/nearbyint.cpp --------------------------------===//
2*936142e0Svdonaldson //
3*936142e0Svdonaldson // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4*936142e0Svdonaldson // See https://llvm.org/LICENSE.txt for license information.
5*936142e0Svdonaldson // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6*936142e0Svdonaldson //
7*936142e0Svdonaldson //===----------------------------------------------------------------------===//
8*936142e0Svdonaldson 
9*936142e0Svdonaldson #include "math-entries.h"
10*936142e0Svdonaldson 
11*936142e0Svdonaldson namespace Fortran::runtime {
12*936142e0Svdonaldson extern "C" {
13*936142e0Svdonaldson 
14*936142e0Svdonaldson #if HAS_LDBL128 || HAS_FLOAT128
15*936142e0Svdonaldson CppTypeFor<TypeCategory::Real, 16> RTDEF(NearbyintF128)(
16*936142e0Svdonaldson     CppTypeFor<TypeCategory::Real, 16> x) {
17*936142e0Svdonaldson   return Nearbyint<true>::invoke(x);
18*936142e0Svdonaldson }
19*936142e0Svdonaldson #endif
20*936142e0Svdonaldson 
21*936142e0Svdonaldson } // extern "C"
22*936142e0Svdonaldson } // namespace Fortran::runtime
23