10b57cec5SDimitry Andric //===-- ashlti3.c - Implement __ashlti3 -----------------------------------===//
20b57cec5SDimitry Andric //
30b57cec5SDimitry Andric // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
40b57cec5SDimitry Andric // See https://llvm.org/LICENSE.txt for license information.
50b57cec5SDimitry Andric // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
60b57cec5SDimitry Andric //
70b57cec5SDimitry Andric //===----------------------------------------------------------------------===//
80b57cec5SDimitry Andric //
90b57cec5SDimitry Andric // This file implements __ashlti3 for the compiler_rt library.
100b57cec5SDimitry Andric //
110b57cec5SDimitry Andric //===----------------------------------------------------------------------===//
120b57cec5SDimitry Andric 
130b57cec5SDimitry Andric #include "int_lib.h"
140b57cec5SDimitry Andric 
150b57cec5SDimitry Andric #ifdef CRT_HAS_128BIT
160b57cec5SDimitry Andric 
170b57cec5SDimitry Andric // Returns: a << b
180b57cec5SDimitry Andric 
190b57cec5SDimitry Andric // Precondition:  0 <= b < bits_in_tword
200b57cec5SDimitry Andric 
__ashlti3(ti_int a,int b)2106c3fb27SDimitry Andric COMPILER_RT_ABI ti_int __ashlti3(ti_int a, int b) {
220b57cec5SDimitry Andric   const int bits_in_dword = (int)(sizeof(di_int) * CHAR_BIT);
230b57cec5SDimitry Andric   twords input;
240b57cec5SDimitry Andric   twords result;
250b57cec5SDimitry Andric   input.all = a;
260b57cec5SDimitry Andric   if (b & bits_in_dword) /* bits_in_dword <= b < bits_in_tword */ {
270b57cec5SDimitry Andric     result.s.low = 0;
280b57cec5SDimitry Andric     result.s.high = input.s.low << (b - bits_in_dword);
290b57cec5SDimitry Andric   } else /* 0 <= b < bits_in_dword */ {
300b57cec5SDimitry Andric     if (b == 0)
310b57cec5SDimitry Andric       return a;
320b57cec5SDimitry Andric     result.s.low = input.s.low << b;
335f757f3fSDimitry Andric     result.s.high =
345f757f3fSDimitry Andric         ((du_int)input.s.high << b) | (input.s.low >> (bits_in_dword - b));
350b57cec5SDimitry Andric   }
360b57cec5SDimitry Andric   return result.all;
370b57cec5SDimitry Andric }
380b57cec5SDimitry Andric 
390b57cec5SDimitry Andric #endif // CRT_HAS_128BIT
40