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