llvm-project/flang-rt/lib/quadmath/numeric-template-specs.h
Michael Kruse 54f37133b7
[Flang][NFC] Move runtime library files to flang-rt (#110298)
Mostly mechanical changes in preparation of extracting the Flang-RT
"subproject" in #110217. This PR intends to only move pre-existing files
to the new folder structure, with no behavioral change. Common files
(headers, testing, cmake) shared by Flang-RT and Flang remain in
`flang/`.

Some cosmetic changes and files paths were necessary:
* Relative paths to the new path for the source files and
`add_subdirectory`.
 * Add the new location's include directory to `include_directories`
* The unittest/Evaluate directory has unitests for flang-rt and Flang. A
new `CMakeLists.txt` was introduced for the flang-rt tests.
 * Change the `#include` paths relative to the include directive
 * clang-format on the `#include` directives
* Since the paths are part if the copyright header and include guards, a
script was used to canonicalize those
* `test/Runtime` and runtime tests in `test/Driver` are moved, but the
lit.cfg.py mechanism to execute the will only be added in #110217.
2025-02-16 13:25:31 +01:00

56 lines
1.6 KiB
C++

//===-- lib/quadmath/numeric-template-specs.h -------------------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#ifndef FLANG_RT_QUADMATH_NUMERIC_TEMPLATE_SPECS_H_
#define FLANG_RT_QUADMATH_NUMERIC_TEMPLATE_SPECS_H_
#include "math-entries.h"
#include "flang-rt/runtime/numeric-templates.h"
namespace Fortran::runtime {
using F128Type = CppTypeFor<TypeCategory::Real, 16>;
template <> struct ABSTy<F128Type> {
static F128Type compute(F128Type x) { return Abs<true>::invoke(x); }
};
template <> struct FREXPTy<F128Type> {
static F128Type compute(F128Type x, int *e) {
return Frexp<true>::invoke(x, e);
}
};
template <> struct ILOGBTy<F128Type> {
static int compute(F128Type x) { return Ilogb<true>::invoke(x); }
};
template <> struct ISINFTy<F128Type> {
static bool compute(F128Type x) { return Isinf<true>::invoke(x); }
};
template <> struct ISNANTy<F128Type> {
static bool compute(F128Type x) { return Isnan<true>::invoke(x); }
};
template <> struct LDEXPTy<F128Type> {
template <typename ET> static F128Type compute(F128Type x, ET p) {
return Ldexp<true>::invoke(x, p);
}
};
template <> struct QNANTy<F128Type> {
static F128Type compute() { return F128_RT_QNAN; }
};
template <> struct SQRTTy<F128Type> {
static F128Type compute(F128Type x) { return Sqrt<true>::invoke(x); }
};
} // namespace Fortran::runtime
#endif // FLANG_RT_QUADMATH_NUMERIC_TEMPLATE_SPECS_H_