blob: 993f71ca9724abda7b06998693eac7704a83235a [file] [log] [blame]
Edward O'Callaghan37a6a452009-08-07 20:30:09 +00001/* ====-- ashldi3.c - Implement __ashldi3 -----------------------------------===
2 *
3 * The LLVM Compiler Infrastructure
4 *
5 * This file is distributed under the University of Illinois Open Source
6 * License. See LICENSE.TXT for details.
7 *
8 * ===----------------------------------------------------------------------===
9 *
10 * This file implements __ashldi3 for the compiler_rt library.
11 *
12 * ===----------------------------------------------------------------------===
13 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000014
15#include "int_lib.h"
16
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000017/* Returns: a << b */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000018
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000019/* Precondition: 0 <= b < bits_in_dword */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000020
21di_int
22__ashldi3(di_int a, si_int b)
23{
24 const int bits_in_word = (int)(sizeof(si_int) * CHAR_BIT);
25 dwords input;
26 dwords result;
27 input.all = a;
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000028 if (b & bits_in_word) /* bits_in_word <= b < bits_in_dword */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000029 {
Edward O'Callaghan8bf1e092009-08-09 18:41:02 +000030 result.s.low = 0;
31 result.s.high = input.s.low << (b - bits_in_word);
Daniel Dunbarb3a69012009-06-26 16:47:03 +000032 }
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000033 else /* 0 <= b < bits_in_word */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000034 {
35 if (b == 0)
36 return a;
Edward O'Callaghan8bf1e092009-08-09 18:41:02 +000037 result.s.low = input.s.low << b;
38 result.s.high = (input.s.high << b) | (input.s.low >> (bits_in_word - b));
Daniel Dunbarb3a69012009-06-26 16:47:03 +000039 }
40 return result.all;
41}