^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 1) // SPDX-License-Identifier: GPL-2.0
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 2) #include "libgcc.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 3)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 4) DWtype
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 5) __ashldi3(DWtype u, word_type b)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 6) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 7) const DWunion uu = {.ll = u};
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 8) const word_type bm = (sizeof (Wtype) * BITS_PER_UNIT) - b;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 9) DWunion w;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 10)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 11) if (b == 0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 12) return u;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 13)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 14) if (bm <= 0) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 15) w.s.low = 0;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 16) w.s.high = (UWtype) uu.s.low << -bm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 17) } else {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 18) const UWtype carries = (UWtype) uu.s.low >> bm;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 19)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 20) w.s.low = (UWtype) uu.s.low << b;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 21) w.s.high = ((UWtype) uu.s.high << b) | carries;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 22) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 23)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 24) return w.ll;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 25) }