int mmod(int a, int b) {
  int c;
  if (b < 0)
    return mmod(-a, -b);
  if (b == 0)
    return a;
  while (a >= b) {
    c = b;
    do {
      c <<= 1;
    } while (c <= a && c < 8192);
    c >>= 1;
    a -= c;
  }
  while (a < 0) {
    c = b;
    do {
      c <<= 1;
    } while (c <= b - a && c < 8192);
    c >>= 1;
    a += c;
  }
  return a;
}


x86 assembly (clang, -O0):
<mmod>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
cmpl   $0x0,-0xc(%rbp)
jge    113f <mmod+0x2f>
xor    %edi,%edi
sub    -0x8(%rbp),%edi
xor    %esi,%esi
sub    -0xc(%rbp),%esi
call   1030 <mmod@plt>
mov    %eax,-0x4(%rbp)
jmp    121f <mmod+0x10f>
cmpl   $0x0,-0xc(%rbp)
jne    1154 <mmod+0x44>
mov    -0x8(%rbp),%eax
mov    %eax,-0x4(%rbp)
jmp    121f <mmod+0x10f>
jmp    1159 <mmod+0x49>
mov    -0x8(%rbp),%eax
cmp    -0xc(%rbp),%eax
jl     11b6 <mmod+0xa6>
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%ecx
xor    %eax,%eax
cmp    -0x8(%rbp),%ecx
mov    %al,-0x11(%rbp)
jg     1192 <mmod+0x82>
cmpl   $0x2000,-0x10(%rbp)
setl   %al
mov    %al,-0x11(%rbp)
mov    -0x11(%rbp),%al
test   $0x1,%al
jne    116b <mmod+0x5b>
mov    -0x10(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0x8(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x8(%rbp)
jmp    1159 <mmod+0x49>
jmp    11bb <mmod+0xab>
cmpl   $0x0,-0x8(%rbp)
jge    1219 <mmod+0x109>
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0xc(%rbp),%edx
sub    -0x8(%rbp),%edx
xor    %eax,%eax
cmp    %edx,%ecx
mov    %al,-0x12(%rbp)
jg     11f7 <mmod+0xe7>
cmpl   $0x2000,-0x10(%rbp)
setl   %al
mov    %al,-0x12(%rbp)
mov    -0x12(%rbp),%al
test   $0x1,%al
jne    11cb <mmod+0xbb>
mov    -0x10(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
add    -0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
jmp    11bb <mmod+0xab>
mov    -0x8(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mmod>:
mov    %edi,%eax
test   %esi,%esi
js     110a <mmod+0xa>
mov    %esi,%ecx
jmp    111a <mmod+0x1a>
mov    %esi,%ecx
nopl   0x0(%rax)
neg    %eax
neg    %ecx
test   %esi,%esi
mov    %ecx,%esi
jg     1110 <mmod+0x10>
test   %ecx,%ecx
jne    1124 <mmod+0x24>
jmp    1144 <mmod+0x44>
sar    %edx
sub    %edx,%eax
cmp    %ecx,%eax
jl     1140 <mmod+0x40>
mov    %ecx,%edx
nopw   0x0(%rax,%rax,1)
add    %edx,%edx
cmp    %eax,%edx
jg     1120 <mmod+0x20>
cmp    $0x2000,%edx
jl     1130 <mmod+0x30>
jmp    1120 <mmod+0x20>
test   %eax,%eax
js     1156 <mmod+0x56>
ret
cs nopw 0x0(%rax,%rax,1)
nop
sar    %edx
add    %edx,%eax
jns    1144 <mmod+0x44>
mov    %ecx,%esi
sub    %eax,%esi
mov    %ecx,%edx
nopl   0x0(%rax)
add    %edx,%edx
cmp    %esi,%edx
jg     1150 <mmod+0x50>
cmp    $0x2000,%edx
jl     1160 <mmod+0x60>
jmp    1150 <mmod+0x50>

LLVM IR (-O0):
define i32 @mmod(i32 %0, i32 %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
store i32 %0, i32* %4
store i32 %1, i32* %5
%7 = load i32, i32* %5
%8 = icmp slt i32 %7, 0
br i1 %8, label %9, label %15
9: ; preds = %2
%10 = load i32, i32* %4
%11 = sub nsw i32 0, %10
%12 = load i32, i32* %5
%13 = sub nsw i32 0, %12
%14 = call i32 @mmod(i32 %11, i32 %13)
store i32 %14, i32* %3
br label %73
15: ; preds = %2
%16 = load i32, i32* %5
%17 = icmp eq i32 %16, 0
br i1 %17, label %18, label %20
18: ; preds = %15
%19 = load i32, i32* %4
store i32 %19, i32* %3
br label %73
20: ; preds = %15
br label %21
21: ; preds = %39, %20
%22 = load i32, i32* %4
%23 = load i32, i32* %5
%24 = icmp sge i32 %22, %23
br i1 %24, label %25, label %45
25: ; preds = %21
%26 = load i32, i32* %5
store i32 %26, i32* %6
br label %27
27: ; preds = %37, %25
%28 = load i32, i32* %6
%29 = shl i32 %28, 1
store i32 %29, i32* %6
br label %30
30: ; preds = %27
%31 = load i32, i32* %6
%32 = load i32, i32* %4
%33 = icmp sle i32 %31, %32
br i1 %33, label %34, label %37
34: ; preds = %30
%35 = load i32, i32* %6
%36 = icmp slt i32 %35, 8192
br label %37
37: ; preds = %34, %30
%38 = phi i1 [ false, %30 ], [ %36, %34 ]
br i1 %38, label %27, label %39
39: ; preds = %37
%40 = load i32, i32* %6
%41 = ashr i32 %40, 1
store i32 %41, i32* %6
%42 = load i32, i32* %6
%43 = load i32, i32* %4
%44 = sub nsw i32 %43, %42
store i32 %44, i32* %4
br label %21
45: ; preds = %21
br label %46
46: ; preds = %65, %45
%47 = load i32, i32* %4
%48 = icmp slt i32 %47, 0
br i1 %48, label %49, label %71
49: ; preds = %46
%50 = load i32, i32* %5
store i32 %50, i32* %6
br label %51
51: ; preds = %63, %49
%52 = load i32, i32* %6
%53 = shl i32 %52, 1
store i32 %53, i32* %6
br label %54
54: ; preds = %51
%55 = load i32, i32* %6
%56 = load i32, i32* %5
%57 = load i32, i32* %4
%58 = sub nsw i32 %56, %57
%59 = icmp sle i32 %55, %58
br i1 %59, label %60, label %63
60: ; preds = %54
%61 = load i32, i32* %6
%62 = icmp slt i32 %61, 8192
br label %63
63: ; preds = %60, %54
%64 = phi i1 [ false, %54 ], [ %62, %60 ]
br i1 %64, label %51, label %65
65: ; preds = %63
%66 = load i32, i32* %6
%67 = ashr i32 %66, 1
store i32 %67, i32* %6
%68 = load i32, i32* %6
%69 = load i32, i32* %4
%70 = add nsw i32 %69, %68
store i32 %70, i32* %4
br label %46
71: ; preds = %46
%72 = load i32, i32* %4
store i32 %72, i32* %3
br label %73
73: ; preds = %71, %18, %9
%74 = load i32, i32* %3
ret i32 %74
}

LLVM IR (-O2):
define i32 @mmod(i32 %0, i32 %1) {
%3 = icmp slt i32 %1, 0
br i1 %3, label %4, label %10
4: ; preds = %2, %4
%5 = phi i32 [ %8, %4 ], [ %1, %2 ]
%6 = phi i32 [ %7, %4 ], [ %0, %2 ]
%7 = sub nsw i32 0, %6
%8 = sub nsw i32 0, %5
%9 = icmp sgt i32 %5, 0
br i1 %9, label %4, label %10
10: ; preds = %4, %2
%11 = phi i32 [ %0, %2 ], [ %7, %4 ]
%12 = phi i32 [ %1, %2 ], [ %8, %4 ]
%13 = icmp eq i32 %12, 0
br i1 %13, label %44, label %14
14: ; preds = %10
%15 = icmp slt i32 %11, %12
br i1 %15, label %18, label %16
16: ; preds = %14, %27
%17 = phi i32 [ %29, %27 ], [ %11, %14 ]
br label %21
18: ; preds = %27, %14
%19 = phi i32 [ %11, %14 ], [ %29, %27 ]
%20 = icmp slt i32 %19, 0
br i1 %20, label %31, label %44
21: ; preds = %16, %21
%22 = phi i32 [ %23, %21 ], [ %12, %16 ]
%23 = shl i32 %22, 1
%24 = icmp sle i32 %23, %17
%25 = icmp slt i32 %23, 8192
%26 = and i1 %24, %25
br i1 %26, label %21, label %27
27: ; preds = %21
%28 = ashr exact i32 %23, 1
%29 = sub nsw i32 %17, %28
%30 = icmp slt i32 %29, %12
br i1 %30, label %18, label %16
31: ; preds = %18, %40
%32 = phi i32 [ %42, %40 ], [ %19, %18 ]
%33 = sub nsw i32 %12, %32
br label %34
34: ; preds = %31, %34
%35 = phi i32 [ %36, %34 ], [ %12, %31 ]
%36 = shl i32 %35, 1
%37 = icmp sle i32 %36, %33
%38 = icmp slt i32 %36, 8192
%39 = and i1 %37, %38
br i1 %39, label %34, label %40
40: ; preds = %34
%41 = ashr exact i32 %36, 1
%42 = add nsw i32 %41, %32
%43 = icmp slt i32 %42, 0
br i1 %43, label %31, label %44
44: ; preds = %40, %18, %10
%45 = phi i32 [ %11, %10 ], [ %19, %18 ], [ %42, %40 ]
ret i32 %45
}