blob: dd5978e5e5f08816572645f71c78fbc400ee7e83 [file] [log] [blame]
Michael Kruse54f37132025-02-16 13:25:31 +01001//===-- lib/quadmath/cosh.cpp -----------------------------------*- C++ -*-===//
Slava Zakharine4604c32024-02-26 14:09:09 -08002//
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 "math-entries.h"
10
11namespace Fortran::runtime {
12extern "C" {
13
Slava Zakharinfc51c7f2024-09-19 15:45:45 -070014#if HAS_LDBL128 || HAS_FLOAT128
Slava Zakharine4604c32024-02-26 14:09:09 -080015CppTypeFor<TypeCategory::Real, 16> RTDEF(CoshF128)(
16 CppTypeFor<TypeCategory::Real, 16> x) {
Slava Zakharin06997492024-02-29 09:05:43 -080017 return Cosh<true>::invoke(x);
Slava Zakharine4604c32024-02-26 14:09:09 -080018}
19#endif
20
21} // extern "C"
22} // namespace Fortran::runtime