tjh.dev
Linux kernel mirror (for testing)
git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux.git
kernel
os
linux
1// SPDX-License-Identifier: GPL-2.0
2#include "libgcc.h"
3
4DWtype __lshrdi3(DWtype u, word_type b)
5{
6 const DWunion uu = {.ll = u};
7 const word_type bm = (sizeof (Wtype) * BITS_PER_UNIT) - b;
8 DWunion w;
9
10 if (b == 0)
11 return u;
12
13 if (bm <= 0) {
14 w.s.high = 0;
15 w.s.low = (UWtype) uu.s.high >> -bm;
16 } else {
17 const UWtype carries = (UWtype) uu.s.high << bm;
18
19 w.s.high = (UWtype) uu.s.high >> b;
20 w.s.low = ((UWtype) uu.s.low >> b) | carries;
21 }
22
23 return w.ll;
24}