blob: 2f3b9cc4f29155ae763b5ffeb7b50a52f2586f0d [file] [log] [blame]
Edward O'Callaghan37a6a452009-08-07 20:30:09 +00001/*===-- moddi3.c - Implement __moddi3 -------------------------------------===
2 *
3 * The LLVM Compiler Infrastructure
4 *
Howard Hinnant9ad441f2010-11-16 22:13:33 +00005 * This file is dual licensed under the MIT and the University of Illinois Open
6 * Source Licenses. See LICENSE.TXT for details.
Edward O'Callaghan37a6a452009-08-07 20:30:09 +00007 *
8 * ===----------------------------------------------------------------------===
9 *
10 * This file implements __moddi3 for the compiler_rt library.
11 *
12 * ===----------------------------------------------------------------------===
13 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000014
15#include "int_lib.h"
16
Anton Korobeynikov1c5f89b2011-04-19 17:52:09 +000017COMPILER_RT_ABI du_int __udivmoddi4(du_int a, du_int b, du_int* rem);
Daniel Dunbarb3a69012009-06-26 16:47:03 +000018
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000019/* Returns: a % b */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000020
Anton Korobeynikov1c5f89b2011-04-19 17:52:09 +000021COMPILER_RT_ABI di_int
Daniel Dunbarb3a69012009-06-26 16:47:03 +000022__moddi3(di_int a, di_int b)
23{
24 const int bits_in_dword_m1 = (int)(sizeof(di_int) * CHAR_BIT) - 1;
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000025 di_int s = b >> bits_in_dword_m1; /* s = b < 0 ? -1 : 0 */
26 b = (b ^ s) - s; /* negate if s == -1 */
27 s = a >> bits_in_dword_m1; /* s = a < 0 ? -1 : 0 */
28 a = (a ^ s) - s; /* negate if s == -1 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000029 di_int r;
30 __udivmoddi4(a, b, (du_int*)&r);
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000031 return (r ^ s) - s; /* negate if s == -1 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000032}