1 //===-- Implementation of lrintl function ---------------------------------===// 2 // 3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 4 // See https://llvm.org/LICENSE.txt for license information. 5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 6 // 7 //===----------------------------------------------------------------------===// 8 9 #include "src/math/lrintl.h" 10 #include "src/__support/FPUtil/NearestIntegerOperations.h" 11 #include "src/__support/common.h" 12 13 namespace LIBC_NAMESPACE { 14 15 LLVM_LIBC_FUNCTION(long, lrintl, (long double x)) { 16 return fputil::round_to_signed_integer_using_current_rounding_mode< 17 long double, long>(x); 18 } 19 20 } // namespace LIBC_NAMESPACE 21