void mp_round(int n, int radix, int m, int inout[]) {
  int j, x;
  short int *inoutdgt;
  inoutdgt = (short int *)&inout[2];
  if (m < n) {
    for (j = n - 1; j > m; j--) {
      inoutdgt[j] = 0;
    }
    x = 2 * inoutdgt[m];
    inoutdgt[m] = 0;
    if (x >= radix) {
      for (j = m - 1; j >= 0; j--) {
        x = inoutdgt[j] + 1;
        if (x < radix) {
          inoutdgt[j] = (short int)x;
          break;
        }
        inoutdgt[j] = 0;
      }
      if (x >= radix) {
        inoutdgt[0] = 1;
        inout[1]++;
      }
    }
  }
}


x86 assembly (clang, -O0):
<mp_round>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %rcx,-0x18(%rbp)
mov    -0x18(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x28(%rbp)
mov    -0xc(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1216 <mp_round+0x116>
mov    -0x4(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jle    115a <mp_round+0x5a>
mov    -0x28(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movw   $0x0,(%rax,%rcx,2)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
jmp    1132 <mp_round+0x32>
mov    -0x28(%rbp),%rax
movslq -0xc(%rbp),%rcx
movswl (%rax,%rcx,2),%eax
shl    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
movslq -0xc(%rbp),%rcx
movw   $0x0,(%rax,%rcx,2)
mov    -0x20(%rbp),%eax
cmp    -0x8(%rbp),%eax
jl     1211 <mp_round+0x111>
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jl     11ea <mp_round+0xea>
mov    -0x28(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movswl (%rax,%rcx,2),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    11ce <mp_round+0xce>
mov    -0x20(%rbp),%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    11ea <mp_round+0xea>
mov    -0x28(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movw   $0x0,(%rax,%rcx,2)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
jmp    118f <mp_round+0x8f>
mov    -0x20(%rbp),%eax
cmp    -0x8(%rbp),%eax
jl     120c <mp_round+0x10c>
mov    -0x28(%rbp),%rax
movw   $0x1,(%rax)
mov    -0x18(%rbp),%rax
mov    0x4(%rax),%ecx
add    $0x1,%ecx
mov    %ecx,0x4(%rax)
jmp    1211 <mp_round+0x111>
jmp    1216 <mp_round+0x116>
pop    %rbp
ret

x86 assembly (clang, -O2):
<mp_round>:
push   %rbp
push   %r14
push   %rbx
cmp    %edi,%edx
jge    11b0 <mp_round+0xa0>
mov    %rcx,%rbx
mov    %edx,%ebp
mov    %esi,%r14d
lea    -0x1(%rdi),%eax
cmp    %edx,%eax
jle    1155 <mp_round+0x45>
movslq %edi,%rax
add    %rax,%rax
sub    %ebp,%edi
add    $0xfffffffe,%edi
sub    %rdi,%rax
sub    %rdi,%rax
add    %rbx,%rax
add    $0x6,%rax
lea    (%rdi,%rdi,1),%rdx
add    $0x2,%rdx
mov    %rax,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
movslq %ebp,%rcx
movswl 0x8(%rbx,%rcx,2),%eax
add    %eax,%eax
movw   $0x0,0x8(%rbx,%rcx,2)
cmp    %r14d,%eax
jl     11b0 <mp_round+0xa0>
test   %ebp,%ebp
jle    11a1 <mp_round+0x91>
mov    %ebp,%ecx
add    $0x1,%rcx
cs nopw 0x0(%rax,%rax,1)
nop
lea    -0x2(%rcx),%edx
movswl 0x8(%rbx,%rdx,2),%eax
add    $0x1,%eax
cmp    %r14d,%eax
jl     11b5 <mp_round+0xa5>
movw   $0x0,0x8(%rbx,%rdx,2)
add    $0xffffffffffffffff,%rcx
cmp    $0x1,%rcx
ja     1180 <mp_round+0x70>
cmp    %r14d,%eax
jl     11b0 <mp_round+0xa0>
movw   $0x1,0x8(%rbx)
addl   $0x1,0x4(%rbx)
pop    %rbx
pop    %r14
pop    %rbp
ret
mov    %ax,0x8(%rbx,%rdx,2)
cmp    %r14d,%eax
jge    11a6 <mp_round+0x96>
jmp    11b0 <mp_round+0xa0>

LLVM IR (-O0):
define void @mp_round(i32 %0, i32 %1, i32 %2, i32* %3) {
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i16*
store i32 %0, i32* %5
store i32 %1, i32* %6
store i32 %2, i32* %7
store i32* %3, i32** %8
%12 = load i32*, i32** %8
%13 = getelementptr inbounds i32, i32* %12, i64 2
%14 = bitcast i32* %13 to i16*
store i16* %14, i16** %11
%15 = load i32, i32* %7
%16 = load i32, i32* %5
%17 = icmp slt i32 %15, %16
br i1 %17, label %18, label %93
18: ; preds = %4
%19 = load i32, i32* %5
%20 = sub nsw i32 %19, 1
store i32 %20, i32* %9
br label %21
21: ; preds = %30, %18
%22 = load i32, i32* %9
%23 = load i32, i32* %7
%24 = icmp sgt i32 %22, %23
br i1 %24, label %25, label %33
25: ; preds = %21
%26 = load i16*, i16** %11
%27 = load i32, i32* %9
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds i16, i16* %26, i64 %28
store i16 0, i16* %29
br label %30
30: ; preds = %25
%31 = load i32, i32* %9
%32 = add nsw i32 %31, -1
store i32 %32, i32* %9
br label %21
33: ; preds = %21
%34 = load i16*, i16** %11
%35 = load i32, i32* %7
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds i16, i16* %34, i64 %36
%38 = load i16, i16* %37
%39 = sext i16 %38 to i32
%40 = mul nsw i32 2, %39
store i32 %40, i32* %10
%41 = load i16*, i16** %11
%42 = load i32, i32* %7
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i16, i16* %41, i64 %43
store i16 0, i16* %44
%45 = load i32, i32* %10
%46 = load i32, i32* %6
%47 = icmp sge i32 %45, %46
br i1 %47, label %48, label %92
48: ; preds = %33
%49 = load i32, i32* %7
%50 = sub nsw i32 %49, 1
store i32 %50, i32* %9
br label %51
51: ; preds = %77, %48
%52 = load i32, i32* %9
%53 = icmp sge i32 %52, 0
br i1 %53, label %54, label %80
54: ; preds = %51
%55 = load i16*, i16** %11
%56 = load i32, i32* %9
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds i16, i16* %55, i64 %57
%59 = load i16, i16* %58
%60 = sext i16 %59 to i32
%61 = add nsw i32 %60, 1
store i32 %61, i32* %10
%62 = load i32, i32* %10
%63 = load i32, i32* %6
%64 = icmp slt i32 %62, %63
br i1 %64, label %65, label %72
65: ; preds = %54
%66 = load i32, i32* %10
%67 = trunc i32 %66 to i16
%68 = load i16*, i16** %11
%69 = load i32, i32* %9
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds i16, i16* %68, i64 %70
store i16 %67, i16* %71
br label %80
72: ; preds = %54
%73 = load i16*, i16** %11
%74 = load i32, i32* %9
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds i16, i16* %73, i64 %75
store i16 0, i16* %76
br label %77
77: ; preds = %72
%78 = load i32, i32* %9
%79 = add nsw i32 %78, -1
store i32 %79, i32* %9
br label %51
80: ; preds = %65, %51
%81 = load i32, i32* %10
%82 = load i32, i32* %6
%83 = icmp sge i32 %81, %82
br i1 %83, label %84, label %91
84: ; preds = %80
%85 = load i16*, i16** %11
%86 = getelementptr inbounds i16, i16* %85, i64 0
store i16 1, i16* %86
%87 = load i32*, i32** %8
%88 = getelementptr inbounds i32, i32* %87, i64 1
%89 = load i32, i32* %88
%90 = add nsw i32 %89, 1
store i32 %90, i32* %88
br label %91
91: ; preds = %84, %80
br label %92
92: ; preds = %91, %33
br label %93
93: ; preds = %92, %4
ret void
}

LLVM IR (-O2):
define void @mp_round(i32 %0, i32 %1, i32 %2, i32* nocapture %3) {
%5 = getelementptr inbounds i32, i32* %3, i64 2
%6 = bitcast i32* %5 to i16*
%7 = icmp slt i32 %2, %0
br i1 %7, label %8, label %55
8: ; preds = %4
%9 = add nsw i32 %0, -1
%10 = icmp sgt i32 %9, %2
br i1 %10, label %11, label %24
11: ; preds = %8
%12 = getelementptr i32, i32* %3, i64 1
%13 = bitcast i32* %12 to i8*
%14 = sext i32 %0 to i64
%15 = shl nsw i64 %14, 1
%16 = add nsw i64 %15, 2
%17 = add nsw i32 %0, -2
%18 = sub i32 %17, %2
%19 = zext i32 %18 to i64
%20 = shl nuw nsw i64 %19, 1
%21 = sub nsw i64 %16, %20
%22 = getelementptr i8, i8* %13, i64 %21
%23 = add nuw nsw i64 %20, 2
br label %24
24: ; preds = %11, %8
%25 = sext i32 %2 to i64
%26 = getelementptr inbounds i16, i16* %6, i64 %25
%27 = load i16, i16* %26
%28 = sext i16 %27 to i32
%29 = shl nsw i32 %28, 1
store i16 0, i16* %26
%30 = icmp slt i32 %29, %1
br i1 %30, label %55, label %31
31: ; preds = %24
%32 = icmp sgt i32 %2, 0
br i1 %32, label %33, label %48
33: ; preds = %31
%34 = zext i32 %2 to i64
br label %35
35: ; preds = %33, %46
%36 = phi i64 [ %34, %33 ], [ %37, %46 ]
%37 = add nsw i64 %36, -1
%38 = and i64 %37, 4294967295
%39 = getelementptr inbounds i16, i16* %6, i64 %38
%40 = load i16, i16* %39
%41 = sext i16 %40 to i32
%42 = add nsw i32 %41, 1
%43 = icmp slt i32 %42, %1
br i1 %43, label %44, label %46
44: ; preds = %35
%45 = trunc i32 %42 to i16
store i16 %45, i16* %39
br label %48
46: ; preds = %35
store i16 0, i16* %39
%47 = icmp ugt i64 %36, 1
br i1 %47, label %35, label %48
48: ; preds = %46, %31, %44
%49 = phi i32 [ %42, %44 ], [ %29, %31 ], [ %42, %46 ]
%50 = icmp slt i32 %49, %1
br i1 %50, label %55, label %51
51: ; preds = %48
store i16 1, i16* %6
%52 = getelementptr inbounds i32, i32* %3, i64 1
%53 = load i32, i32* %52
%54 = add nsw i32 %53, 1
store i32 %54, i32* %52
br label %55
55: ; preds = %24, %51, %48, %4
ret void
}