void order(n, pbuf) int n;
double pbuf[];
{
  int gap, i, j;
  double temp;
  for (gap = n / 2; gap > 0; gap /= 2)
    for (i = gap; i < n; i++)
      for (j = i - gap; j >= 0 && pbuf[j] > pbuf[j + gap]; j -= gap) {
        temp = pbuf[j];
        pbuf[j] = pbuf[j + gap];
        pbuf[j + gap] = temp;
      }
}


x86 assembly (clang, -O0):
<order>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x4(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x14(%rbp)
cmpl   $0x0,-0x14(%rbp)
jle    1205 <order+0x105>
mov    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11ed <order+0xed>
mov    -0x18(%rbp),%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x1c(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0x1c(%rbp)
mov    %al,-0x29(%rbp)
jl     1172 <order+0x72>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
ucomisd (%rax,%rcx,8),%xmm0
seta   %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    1182 <order+0x82>
jmp    11da <order+0xda>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x28(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x14(%rbp),%ecx
mov    -0x1c(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x1c(%rbp)
jmp    113e <order+0x3e>
jmp    11df <order+0xdf>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1129 <order+0x29>
jmp    11f2 <order+0xf2>
mov    -0x14(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x14(%rbp)
jmp    1119 <order+0x19>
pop    %rbp
ret

x86 assembly (clang, -O2):
<order>:
cmp    $0x2,%edi
jl     1168 <order+0x68>
mov    %edi,%eax
jmp    1116 <order+0x16>
nopl   0x0(%rax)
cmp    $0x4,%r8d
jl     1168 <order+0x68>
mov    %eax,%r8d
shr    $0x1f,%eax
add    %r8d,%eax
sar    %eax
cmp    %edi,%eax
jge    1110 <order+0x10>
mov    %eax,%r9d
jmp    1139 <order+0x39>
nopw   0x0(%rax,%rax,1)
add    $0x1,%r9d
cmp    %edi,%r9d
je     1110 <order+0x10>
mov    %r9d,%ecx
sub    %eax,%ecx
js     1130 <order+0x30>
lea    (%rax,%rcx,1),%edx
mov    %ecx,%ecx
movsd  (%rsi,%rcx,8),%xmm0
movslq %edx,%rdx
movsd  (%rsi,%rdx,8),%xmm1
ucomisd %xmm1,%xmm0
jbe    1130 <order+0x30>
movsd  %xmm1,(%rsi,%rcx,8)
movsd  %xmm0,(%rsi,%rdx,8)
sub    %eax,%ecx
jns    1140 <order+0x40>
jmp    1130 <order+0x30>
ret

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

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