20 lines · plain
1//===----------------------------------------------------------------------===//2//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-exception6//7//===----------------------------------------------------------------------===//8 9_CLC_OVERLOAD _CLC_DEF __CLC_S_GENTYPE10__clc_bitfield_extract_signed(__CLC_GENTYPE base, uint offset, uint count) {11 if (count == 0)12 return 0;13 __CLC_U_GENTYPE x = __CLC_AS_U_GENTYPE(base)14 << (__CLC_GENSIZE - offset - count);15 // Implement an arithmetic shift right.16 __CLC_U_GENTYPE s = -(x >> (__CLC_GENSIZE - 1));17 __CLC_U_GENTYPE result = ((s ^ x) >> (__CLC_GENSIZE - count)) ^ s;18 return __CLC_AS_S_GENTYPE(result);19}20