ashlti3.c 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839
  1. //===-- ashlti3.c - Implement __ashlti3 -----------------------------------===//
  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-exception
  6. //
  7. //===----------------------------------------------------------------------===//
  8. //
  9. // This file implements __ashlti3 for the compiler_rt library.
  10. //
  11. //===----------------------------------------------------------------------===//
  12. #include "int_lib.h"
  13. #ifdef CRT_HAS_128BIT
  14. // Returns: a << b
  15. // Precondition: 0 <= b < bits_in_tword
  16. COMPILER_RT_ABI ti_int __ashlti3(ti_int a, int b) {
  17. const int bits_in_dword = (int)(sizeof(di_int) * CHAR_BIT);
  18. twords input;
  19. twords result;
  20. input.all = a;
  21. if (b & bits_in_dword) /* bits_in_dword <= b < bits_in_tword */ {
  22. result.s.low = 0;
  23. result.s.high = input.s.low << (b - bits_in_dword);
  24. } else /* 0 <= b < bits_in_dword */ {
  25. if (b == 0)
  26. return a;
  27. result.s.low = input.s.low << b;
  28. result.s.high =
  29. ((du_int)input.s.high << b) | (input.s.low >> (bits_in_dword - b));
  30. }
  31. return result.all;
  32. }
  33. #endif // CRT_HAS_128BIT