ashlti3.c 1.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445
  1. /* ===-- ashlti3.c - Implement __ashlti3 -----------------------------------===
  2. *
  3. * The LLVM Compiler Infrastructure
  4. *
  5. * This file is dual licensed under the MIT and the University of Illinois Open
  6. * Source Licenses. See LICENSE.TXT for details.
  7. *
  8. * ===----------------------------------------------------------------------===
  9. *
  10. * This file implements __ashlti3 for the compiler_rt library.
  11. *
  12. * ===----------------------------------------------------------------------===
  13. */
  14. #include "int_lib.h"
  15. #ifdef CRT_HAS_128BIT
  16. /* Returns: a << b */
  17. /* Precondition: 0 <= b < bits_in_tword */
  18. COMPILER_RT_ABI ti_int
  19. __ashlti3(ti_int a, si_int b)
  20. {
  21. const int bits_in_dword = (int)(sizeof(di_int) * CHAR_BIT);
  22. twords input;
  23. twords result;
  24. input.all = a;
  25. if (b & bits_in_dword) /* bits_in_dword <= b < bits_in_tword */
  26. {
  27. result.s.low = 0;
  28. result.s.high = input.s.low << (b - bits_in_dword);
  29. }
  30. else /* 0 <= b < bits_in_dword */
  31. {
  32. if (b == 0)
  33. return a;
  34. result.s.low = input.s.low << b;
  35. result.s.high = (input.s.high << b) | (input.s.low >> (bits_in_dword - b));
  36. }
  37. return result.all;
  38. }
  39. #endif /* CRT_HAS_128BIT */