runtime/mppa_k1c/i64_smod.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

#if COMPLIQUE
unsigned long long
udivmoddi4(unsigned long long num, unsigned long long den, int modwanted);

long long
i64_smod (long long a, long long b)
{
  int neg = 0;
  long long res;

  if (a < 0)
    {
      a = -a;
      neg = 1;
    }

  if (b < 0)
    b = -b;

  res = udivmoddi4 (a, b, 1);

  if (neg)
    res = -res;

  return res;
}

#else
extern long __moddi3 (long a, long b);

long i64_smod (long a, long b)
{
  return __moddi3 (a, b);
}

int i32_smod (int a, int b)
{
  return __moddi3 (a, b);
}
#endif