void hufgencode(long *inbuf, long inum, long *hitab, long *hbmax) {
  long i, tbuf[31];
  for (i = 30; i; i--)
    tbuf[i] = 0;
  for (i = inum - 1; i >= 0; i--)
    tbuf[inbuf[i]]++;
  tbuf[0] = hbmax[0] = 0;
  for (i = 0; i < 31; i++)
    hbmax[i + 1] = hbmax[i] + tbuf[i];
  for (i = 0; i < inum; i++)
    if (inbuf[i])
      hitab[hbmax[inbuf[i]]++] = i;
}


x86 assembly (clang, -O0):
<hufgencode>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
movq   $0x1e,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
je     114f <hufgencode+0x4f>
mov    -0x28(%rbp),%rax
movq   $0x0,-0x120(%rbp,%rax,8)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    1123 <hufgencode+0x23>
mov    -0x10(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jl     1197 <hufgencode+0x97>
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x120(%rbp,%rax,8),%rcx
ff
add    $0x1,%rcx
mov    %rcx,-0x120(%rbp,%rax,8)
ff
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
jmp    115b <hufgencode+0x5b>
mov    -0x20(%rbp),%rax
movq   $0x0,(%rax)
movq   $0x0,-0x120(%rbp)
movq   $0x0,-0x28(%rbp)
cmpq   $0x1f,-0x28(%rbp)
jge    11f6 <hufgencode+0xf6>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x28(%rbp),%rax
add    -0x120(%rbp,%rax,8),%rdx
ff
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    %rdx,0x8(%rax,%rcx,8)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11b5 <hufgencode+0xb5>
movq   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1260 <hufgencode+0x160>
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
je     124a <hufgencode+0x14a>
mov    -0x28(%rbp),%rdx
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%rsi
mov    -0x8(%rbp),%rcx
mov    -0x28(%rbp),%rdi
mov    (%rcx,%rdi,8),%rdi
mov    (%rsi,%rdi,8),%rcx
mov    %rcx,%r8
add    $0x1,%r8
mov    %r8,(%rsi,%rdi,8)
mov    %rdx,(%rax,%rcx,8)
jmp    124f <hufgencode+0x14f>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11fe <hufgencode+0xfe>
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<hufgencode>:
push   %rbx
sub    $0x80,%rsp
xorps  %xmm0,%xmm0
movups %xmm0,0x68(%rsp)
movups %xmm0,0x58(%rsp)
movups %xmm0,0x48(%rsp)
movups %xmm0,0x38(%rsp)
movups %xmm0,0x28(%rsp)
movups %xmm0,0x18(%rsp)
movups %xmm0,0x8(%rsp)
movups %xmm0,-0x8(%rsp)
movups %xmm0,-0x18(%rsp)
movups %xmm0,-0x28(%rsp)
movups %xmm0,-0x38(%rsp)
movups %xmm0,-0x48(%rsp)
movups %xmm0,-0x58(%rsp)
movups %xmm0,-0x68(%rsp)
movups %xmm0,-0x78(%rsp)
test   %rsi,%rsi
jle    11c6 <hufgencode+0xc6>
lea    -0x1(%rsi),%r8
mov    %rsi,%r9
mov    %rsi,%r11
and    $0x3,%r9
je     1185 <hufgencode+0x85>
mov    %rsi,%r11
xchg   %ax,%ax
mov    -0x8(%rdi,%r11,8),%r10
add    $0xffffffffffffffff,%r11
addq   $0x1,-0x80(%rsp,%r10,8)
add    $0xffffffffffffffff,%r9
jne    1170 <hufgencode+0x70>
cmp    $0x3,%r8
jb     11c6 <hufgencode+0xc6>
add    $0x1,%r11
nop
mov    -0x10(%rdi,%r11,8),%rax
addq   $0x1,-0x80(%rsp,%rax,8)
mov    -0x18(%rdi,%r11,8),%rax
addq   $0x1,-0x80(%rsp,%rax,8)
mov    -0x20(%rdi,%r11,8),%rax
addq   $0x1,-0x80(%rsp,%rax,8)
mov    -0x28(%rdi,%r11,8),%rax
addq   $0x1,-0x80(%rsp,%rax,8)
add    $0xfffffffffffffffc,%r11
cmp    $0x1,%r11
ja     1190 <hufgencode+0x90>
movq   $0x0,-0x80(%rsp)
movups %xmm0,(%rcx)
xor    %r8d,%r8d
xor    %eax,%eax
nopw   0x0(%rax,%rax,1)
add    -0x78(%rsp,%r8,8),%rax
mov    %rax,0x10(%rcx,%r8,8)
add    -0x70(%rsp,%r8,8),%rax
mov    %rax,0x18(%rcx,%r8,8)
add    -0x68(%rsp,%r8,8),%rax
mov    %rax,0x20(%rcx,%r8,8)
add    -0x60(%rsp,%r8,8),%rax
mov    %rax,0x28(%rcx,%r8,8)
add    -0x58(%rsp,%r8,8),%rax
mov    %rax,0x30(%rcx,%r8,8)
add    $0x5,%r8
cmp    $0x1e,%r8
jne    11e0 <hufgencode+0xe0>
test   %rsi,%rsi
jle    1249 <hufgencode+0x149>
cmp    $0x1,%rsi
jne    1252 <hufgencode+0x152>
xor    %r11d,%r11d
test   $0x1,%sil
je     1249 <hufgencode+0x149>
mov    (%rdi,%r11,8),%rsi
test   %rsi,%rsi
je     1249 <hufgencode+0x149>
mov    (%rcx,%rsi,8),%rax
lea    0x1(%rax),%rdi
mov    %rdi,(%rcx,%rsi,8)
mov    %r11,(%rdx,%rax,8)
add    $0x80,%rsp
pop    %rbx
ret
mov    %rsi,%r8
and    $0xfffffffffffffffe,%r8
xor    %r11d,%r11d
jmp    1269 <hufgencode+0x169>
xchg   %ax,%ax
add    $0x2,%r11
cmp    %r11,%r8
je     122a <hufgencode+0x12a>
mov    (%rdi,%r11,8),%r9
test   %r9,%r9
je     1282 <hufgencode+0x182>
mov    (%rcx,%r9,8),%r10
lea    0x1(%r10),%rax
mov    %rax,(%rcx,%r9,8)
mov    %r11,(%rdx,%r10,8)
mov    0x8(%rdi,%r11,8),%r9
test   %r9,%r9
je     1260 <hufgencode+0x160>
lea    0x1(%r11),%r10
mov    (%rcx,%r9,8),%rax
lea    0x1(%rax),%rbx
mov    %rbx,(%rcx,%r9,8)
mov    %r10,(%rdx,%rax,8)
jmp    1260 <hufgencode+0x160>

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

LLVM IR (-O2):
define void @hufgencode(i64* nocapture %0, i64 %1, i64* nocapture writeonly %2, i64* nocapture %3) {
%5 = alloca [31 x i64]
%6 = bitcast [31 x i64]* %5 to i8*
%7 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 1
%8 = bitcast i64* %7 to i8*
%9 = icmp sgt i64 %1, 0
br i1 %9, label %10, label %55
10: ; preds = %4
%11 = add i64 %1, -1
%12 = and i64 %1, 3
%13 = icmp eq i64 %12, 0
br i1 %13, label %25, label %14
14: ; preds = %10, %14
%15 = phi i64 [ %17, %14 ], [ %1, %10 ]
%16 = phi i64 [ %23, %14 ], [ 0, %10 ]
%17 = add nsw i64 %15, -1
%18 = getelementptr inbounds i64, i64* %0, i64 %17
%19 = load i64, i64* %18
%20 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %19
%21 = load i64, i64* %20
%22 = add nsw i64 %21, 1
store i64 %22, i64* %20
%23 = add i64 %16, 1
%24 = icmp eq i64 %23, %12
br i1 %24, label %25, label %14
25: ; preds = %14, %10
%26 = phi i64 [ %1, %10 ], [ %17, %14 ]
%27 = icmp ult i64 %11, 3
br i1 %27, label %55, label %28
28: ; preds = %25, %28
%29 = phi i64 [ %48, %28 ], [ %26, %25 ]
%30 = add nsw i64 %29, -1
%31 = getelementptr inbounds i64, i64* %0, i64 %30
%32 = load i64, i64* %31
%33 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %32
%34 = load i64, i64* %33
%35 = add nsw i64 %34, 1
store i64 %35, i64* %33
%36 = add nsw i64 %29, -2
%37 = getelementptr inbounds i64, i64* %0, i64 %36
%38 = load i64, i64* %37
%39 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %38
%40 = load i64, i64* %39
%41 = add nsw i64 %40, 1
store i64 %41, i64* %39
%42 = add nsw i64 %29, -3
%43 = getelementptr inbounds i64, i64* %0, i64 %42
%44 = load i64, i64* %43
%45 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %44
%46 = load i64, i64* %45
%47 = add nsw i64 %46, 1
store i64 %47, i64* %45
%48 = add nsw i64 %29, -4
%49 = getelementptr inbounds i64, i64* %0, i64 %48
%50 = load i64, i64* %49
%51 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %50
%52 = load i64, i64* %51
%53 = add nsw i64 %52, 1
store i64 %53, i64* %51
%54 = icmp ugt i64 %42, 1
br i1 %54, label %28, label %55
55: ; preds = %25, %28, %4
%56 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 0
store i64 0, i64* %56
%57 = bitcast i64* %3 to <2 x i64>*
store <2 x i64> zeroinitializer, <2 x i64>* %57
br label %64
58: ; preds = %64
br i1 %9, label %59, label %130
59: ; preds = %58
%60 = and i64 %1, 1
%61 = icmp eq i64 %1, 1
br i1 %61, label %118, label %62
62: ; preds = %59
%63 = and i64 %1, -2
br label %93
64: ; preds = %64, %55
%65 = phi i64 [ 1, %55 ], [ %90, %64 ]
%66 = phi i64 [ 0, %55 ], [ %89, %64 ]
%67 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %65
%68 = load i64, i64* %67
%69 = add nsw i64 %68, %66
%70 = add nuw nsw i64 %65, 1
%71 = getelementptr inbounds i64, i64* %3, i64 %70
store i64 %69, i64* %71
%72 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %70
%73 = load i64, i64* %72
%74 = add nsw i64 %73, %69
%75 = add nuw nsw i64 %65, 2
%76 = getelementptr inbounds i64, i64* %3, i64 %75
store i64 %74, i64* %76
%77 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %75
%78 = load i64, i64* %77
%79 = add nsw i64 %78, %74
%80 = add nuw nsw i64 %65, 3
%81 = getelementptr inbounds i64, i64* %3, i64 %80
store i64 %79, i64* %81
%82 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %80
%83 = load i64, i64* %82
%84 = add nsw i64 %83, %79
%85 = add nuw nsw i64 %65, 4
%86 = getelementptr inbounds i64, i64* %3, i64 %85
store i64 %84, i64* %86
%87 = getelementptr inbounds [31 x i64], [31 x i64]* %5, i64 0, i64 %85
%88 = load i64, i64* %87
%89 = add nsw i64 %88, %84
%90 = add nuw nsw i64 %65, 5
%91 = getelementptr inbounds i64, i64* %3, i64 %90
store i64 %89, i64* %91
%92 = icmp eq i64 %90, 31
br i1 %92, label %58, label %64
93: ; preds = %114, %62
%94 = phi i64 [ 0, %62 ], [ %115, %114 ]
%95 = phi i64 [ 0, %62 ], [ %116, %114 ]
%96 = getelementptr inbounds i64, i64* %0, i64 %94
%97 = load i64, i64* %96
%98 = icmp eq i64 %97, 0
br i1 %98, label %104, label %99
99: ; preds = %93
%100 = getelementptr inbounds i64, i64* %3, i64 %97
%101 = load i64, i64* %100
%102 = add nsw i64 %101, 1
store i64 %102, i64* %100
%103 = getelementptr inbounds i64, i64* %2, i64 %101
store i64 %94, i64* %103
br label %104
104: ; preds = %93, %99
%105 = or i64 %94, 1
%106 = getelementptr inbounds i64, i64* %0, i64 %105
%107 = load i64, i64* %106
%108 = icmp eq i64 %107, 0
br i1 %108, label %114, label %109
109: ; preds = %104
%110 = getelementptr inbounds i64, i64* %3, i64 %107
%111 = load i64, i64* %110
%112 = add nsw i64 %111, 1
store i64 %112, i64* %110
%113 = getelementptr inbounds i64, i64* %2, i64 %111
store i64 %105, i64* %113
br label %114
114: ; preds = %109, %104
%115 = add nuw nsw i64 %94, 2
%116 = add i64 %95, 2
%117 = icmp eq i64 %116, %63
br i1 %117, label %118, label %93
118: ; preds = %114, %59
%119 = phi i64 [ 0, %59 ], [ %115, %114 ]
%120 = icmp eq i64 %60, 0
br i1 %120, label %130, label %121
121: ; preds = %118
%122 = getelementptr inbounds i64, i64* %0, i64 %119
%123 = load i64, i64* %122
%124 = icmp eq i64 %123, 0
br i1 %124, label %130, label %125
125: ; preds = %121
%126 = getelementptr inbounds i64, i64* %3, i64 %123
%127 = load i64, i64* %126
%128 = add nsw i64 %127, 1
store i64 %128, i64* %126
%129 = getelementptr inbounds i64, i64* %2, i64 %127
store i64 %119, i64* %129
br label %130
130: ; preds = %118, %125, %121, %58
ret void
}