Sort(rgKey, rgw, fAscending) int rgKey[], rgw[], fAscending;
{
  int gap, i, j, temp;
  for (gap = 128 / 2; gap > 0; gap /= 2)
    for (i = gap; i < 128; i++)
      for (j = i - gap; j >= 0 && (fAscending ? (rgKey[j] > rgKey[j + gap])
                                              : (rgKey[j] < rgKey[j + gap]));
           j -= gap) {
        temp = rgKey[j];
        rgKey[j] = rgKey[j + gap];
        rgKey[j + gap] = temp;
        temp = rgw[j];
        rgw[j] = rgw[j + gap];
        rgw[j + gap] = temp;
      }
}


x86 assembly (clang, -O0):
<Sort>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
movl   $0x40,-0x20(%rbp)
cmpl   $0x0,-0x20(%rbp)
jle    1275 <Sort+0x175>
mov    -0x20(%rbp),%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x80,-0x24(%rbp)
jge    125d <Sort+0x15d>
mov    -0x24(%rbp),%eax
sub    -0x20(%rbp),%eax
mov    %eax,-0x28(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0x28(%rbp)
mov    %al,-0x2d(%rbp)
jl     11b2 <Sort+0xb2>
cmpl   $0x0,-0x1c(%rbp)
je     1180 <Sort+0x80>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x10(%rbp),%rcx
mov    -0x28(%rbp),%edx
add    -0x20(%rbp),%edx
movslq %edx,%rdx
cmp    (%rcx,%rdx,4),%eax
setg   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x34(%rbp)
jmp    11a6 <Sort+0xa6>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x10(%rbp),%rcx
mov    -0x28(%rbp),%edx
add    -0x20(%rbp),%edx
movslq %edx,%rdx
cmp    (%rcx,%rdx,4),%eax
setl   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x2d(%rbp)
mov    -0x2d(%rbp),%al
test   $0x1,%al
jne    11c2 <Sort+0xc2>
jmp    124a <Sort+0x14a>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x2c(%rbp),%edx
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x18(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x18(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x2c(%rbp),%edx
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%ecx
mov    -0x28(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x28(%rbp)
jmp    113c <Sort+0x3c>
jmp    124f <Sort+0x14f>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1126 <Sort+0x26>
jmp    1262 <Sort+0x162>
mov    -0x20(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x20(%rbp)
jmp    1116 <Sort+0x16>
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<Sort>:
push   %rbx
mov    $0x40,%r9d
jmp    1124 <Sort+0x24>
nopl   0x0(%rax)
mov    %r9d,%eax
shr    $0x1f,%eax
add    %r9d,%eax
sar    %eax
cmp    $0x1,%r9d
mov    %eax,%r9d
jle    118c <Sort+0x8c>
cmp    $0x7f,%r9d
jg     1110 <Sort+0x10>
mov    %r9d,%r8d
jmp    113d <Sort+0x3d>
nop
add    $0x1,%r8d
cmp    $0x80,%r8d
je     1110 <Sort+0x10>
mov    %r8d,%ecx
sub    %r9d,%ecx
jmp    1170 <Sort+0x70>
cs nopw 0x0(%rax,%rax,1)
nop
cmp    %r11d,%r10d
jge    1130 <Sort+0x30>
mov    %r11d,(%rdi,%rcx,4)
mov    %r10d,(%rdi,%rbx,4)
mov    (%rsi,%rcx,4),%r10d
mov    (%rsi,%rbx,4),%eax
mov    %eax,(%rsi,%rcx,4)
mov    %r10d,(%rsi,%rbx,4)
sub    %r9d,%ecx
js     1130 <Sort+0x30>
lea    (%r9,%rcx,1),%eax
mov    %ecx,%ecx
mov    (%rdi,%rcx,4),%r10d
movslq %eax,%rbx
mov    (%rdi,%rbx,4),%r11d
test   %edx,%edx
je     1150 <Sort+0x50>
cmp    %r11d,%r10d
jg     1155 <Sort+0x55>
jmp    1130 <Sort+0x30>
pop    %rbx
ret

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

LLVM IR (-O2):
define i32 @Sort(i32* nocapture %0, i32* nocapture %1, i32 %2) {
%4 = icmp eq i32 %2, 0
br label %5
5: ; preds = %3, %36
%6 = phi i32 [ 64, %3 ], [ %37, %36 ]
%7 = icmp slt i32 %6, 128
br i1 %7, label %8, label %36
8: ; preds = %5, %33
%9 = phi i32 [ %34, %33 ], [ %6, %5 ]
%10 = sub nsw i32 %9, %6
br label %11
11: ; preds = %8, %24
%12 = phi i32 [ %31, %24 ], [ %10, %8 ]
%13 = phi i32 [ %12, %24 ], [ %9, %8 ]
%14 = zext i32 %12 to i64
%15 = getelementptr inbounds i32, i32* %0, i64 %14
%16 = load i32, i32* %15
%17 = sext i32 %13 to i64
%18 = getelementptr inbounds i32, i32* %0, i64 %17
%19 = load i32, i32* %18
br i1 %4, label %22, label %20
20: ; preds = %11
%21 = icmp sgt i32 %16, %19
br i1 %21, label %24, label %33
22: ; preds = %11
%23 = icmp slt i32 %16, %19
br i1 %23, label %24, label %33
24: ; preds = %20, %22
%25 = getelementptr inbounds i32, i32* %0, i64 %14
%26 = getelementptr inbounds i32, i32* %0, i64 %17
store i32 %19, i32* %25
store i32 %16, i32* %26
%27 = getelementptr inbounds i32, i32* %1, i64 %14
%28 = load i32, i32* %27
%29 = getelementptr inbounds i32, i32* %1, i64 %17
%30 = load i32, i32* %29
store i32 %30, i32* %27
store i32 %28, i32* %29
%31 = sub nsw i32 %12, %6
%32 = icmp sgt i32 %31, -1
br i1 %32, label %11, label %33
33: ; preds = %24, %22, %20
%34 = add nsw i32 %9, 1
%35 = icmp eq i32 %34, 128
br i1 %35, label %36, label %8
36: ; preds = %33, %5
%37 = sdiv i32 %6, 2
%38 = icmp sgt i32 %6, 1
br i1 %38, label %5, label %39
39: ; preds = %36
ret i32 undef
}