| //===----------------------------------------------------------------------===// |
| // |
| // 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 |
| // |
| //===----------------------------------------------------------------------===// |
| |
| _CLC_OVERLOAD _CLC_DEF __CLC_S_GENTYPE |
| __clc_bitfield_extract_signed(__CLC_GENTYPE base, uint offset, uint count) { |
| if (count == 0) |
| return 0; |
| __CLC_U_GENTYPE x = __CLC_AS_U_GENTYPE(base) |
| << (__CLC_GENSIZE - offset - count); |
| // Implement an arithmetic shift right. |
| __CLC_U_GENTYPE s = -(x >> (__CLC_GENSIZE - 1)); |
| __CLC_U_GENTYPE result = ((s ^ x) >> (__CLC_GENSIZE - count)) ^ s; |
| return __CLC_AS_S_GENTYPE(result); |
| } |
