derek.holloway
7502bf64a4
CodeQL / Analyze (actions) (push) Canceled after 0s
CodeQL / Analyze (python) (push) Canceled after 0s
pre-commit / pre-commit (push) Canceled after 0s
Multi-Arch CI / setup (push) Canceled after 0s
Publish build_manylinux_x86_64 images / publish_build_manylinux_x86_64 (push) Canceled after 0s
Setup (Multi-Arch) / setup (push) Canceled after 0s
Multi-Arch CI / Linux::${{ fromJSON(needs.setup.outputs.linux_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubi10 image / publish_no_rocm_image_ubi10 (push) Canceled after 0s
Multi-Arch CI / Windows::${{ fromJSON(needs.setup.outputs.windows_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Multi-Arch CI / Manifest Diff (push) Canceled after 0s
TheRock Manifest Diff Report / Generate Manifest Diff Report (push) Canceled after 0s
Multi-Arch CI / CI Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_ocl_rt images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_rocgdb images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Unit Tests / Unit Tests :: ubuntu-24.04 (push) Canceled after 0s
Unit Tests / Unit Tests :: windows-2022 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_media (push) Canceled after 0s
Unit Tests / Unit Tests Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_openmpi (push) Canceled after 0s
63 lines
2.1 KiB
C++
63 lines
2.1 KiB
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
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#if __CLC_VECSIZE_OR_1 == 1
|
|
|
|
_CLC_OVERLOAD _CLC_DEF __CLC_GENTYPE __clc_length(__CLC_GENTYPE p) {
|
|
return __clc_fabs(p);
|
|
}
|
|
|
|
#elif (__CLC_VECSIZE_OR_1 == 2 || __CLC_VECSIZE_OR_1 == 3 || \
|
|
__CLC_VECSIZE_OR_1 == 4)
|
|
|
|
#if __CLC_FPSIZE == 32
|
|
#define __CLC_SCALAR_GENTYPE_MIN FLT_MIN
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_UP 0x1.0p+86F
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_DOWN 0x1.0p-86F
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_UP 0x1.0p+65F
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_DOWN 0x1.0p-65F
|
|
#elif __CLC_FPSIZE == 64
|
|
#define __CLC_SCALAR_GENTYPE_MIN DBL_MIN
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_UP 0x1.0p+563
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_DOWN 0x1.0p-563
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_UP 0x1.0p+513
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_DOWN 0x1.0p-513
|
|
#elif __CLC_FPSIZE == 16
|
|
#define __CLC_SCALAR_GENTYPE_MIN HALF_MIN
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_UP 0x1.0p+12H
|
|
#define __CLC_SCALAR_GENTYPE_MIN_SCALE_DOWN 0x1.0p-12H
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_UP 0x1.0p+7H
|
|
#define __CLC_SCALAR_GENTYPE_INF_SCALE_DOWN 0x1.0p-7H
|
|
#else
|
|
#error "Unsupported FP size"
|
|
#endif
|
|
|
|
_CLC_OVERLOAD _CLC_DEF __CLC_SCALAR_GENTYPE __clc_length(__CLC_GENTYPE p) {
|
|
__CLC_SCALAR_GENTYPE l2 = __clc_dot(p, p);
|
|
|
|
if (l2 < __CLC_SCALAR_GENTYPE_MIN) {
|
|
p *= __CLC_SCALAR_GENTYPE_MIN_SCALE_UP;
|
|
return __clc_sqrt(__clc_dot(p, p)) * __CLC_SCALAR_GENTYPE_MIN_SCALE_DOWN;
|
|
}
|
|
|
|
if (l2 == INFINITY) {
|
|
p *= __CLC_SCALAR_GENTYPE_INF_SCALE_DOWN;
|
|
return __clc_sqrt(__clc_dot(p, p)) * __CLC_SCALAR_GENTYPE_INF_SCALE_UP;
|
|
}
|
|
|
|
return __clc_sqrt(l2);
|
|
}
|
|
|
|
#undef __CLC_SCALAR_GENTYPE_INF_SCALE_DOWN
|
|
#undef __CLC_SCALAR_GENTYPE_INF_SCALE_UP
|
|
#undef __CLC_SCALAR_GENTYPE_MIN_SCALE_DOWN
|
|
#undef __CLC_SCALAR_GENTYPE_MIN_SCALE_UP
|
|
#undef __CLC_SCALAR_GENTYPE_MIN
|
|
|
|
#endif
|