#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ free_ivector(int *, int, int);
int *ivector(int, int);
int /*<<< orphan*/ nrerror(char *);
void sort(unsigned long n, double arr[]) {
  unsigned long i, ir = n, j, k, l = 1;
  int jstack = 0, *istack;
  double a, temp;
  istack = ivector(1, 50);
  for (;;) {
    if (ir - l < 7) {
      for (j = l + 1; j <= ir; j++) {
        a = arr[j];
        for (i = j - 1; i >= 1; i--) {
          if (arr[i] <= a)
            break;
          arr[i + 1] = arr[i];
        }
        arr[i + 1] = a;
      }
      if (jstack == 0)
        break;
      ir = istack[jstack--];
      l = istack[jstack--];
    } else {
      k = (l + ir) >> 1;
      temp = (arr[k]);
      (arr[k]) = (arr[l + 1]);
      (arr[l + 1]) = temp;
      if (arr[l + 1] > arr[ir]) {
        temp = (arr[l + 1]);
        (arr[l + 1]) = (arr[ir]);
        (arr[ir]) = temp;
      }
      if (arr[l] > arr[ir]) {
        temp = (arr[l]);
        (arr[l]) = (arr[ir]);
        (arr[ir]) = temp;
      }
      if (arr[l + 1] > arr[l]) {
        temp = (arr[l + 1]);
        (arr[l + 1]) = (arr[l]);
        (arr[l]) = temp;
      }
      i = l + 1;
      j = ir;
      a = arr[l];
      for (;;) {
        do
          i++;
        while (arr[i] < a);
        do
          j--;
        while (arr[j] > a);
        if (j < i)
          break;
        temp = (arr[i]);
        (arr[i]) = (arr[j]);
        (arr[j]) = temp;
        ;
      }
      arr[l] = arr[j];
      arr[j] = a;
      jstack += 2;
      if (jstack > 50)
        nrerror("NSTACK too small in sort.");
      if (ir - i + 1 >= j - l) {
        istack[jstack] = ir;
        istack[jstack - 1] = i;
        ir = j - 1;
      } else {
        istack[jstack] = j - 1;
        istack[jstack - 1] = l;
        l = i;
      }
    }
  }
  free_ivector(istack, 1, 50);
}


x86 assembly (clang, -O0):
<sort>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x20(%rbp)
movq   $0x1,-0x38(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    $0x1,%edi
mov    $0x32,%esi
call   1050 <ivector@plt>
mov    %rax,-0x48(%rbp)
mov    -0x20(%rbp),%rax
sub    -0x38(%rbp),%rax
cmp    $0x7,%rax
jae    1278 <sort+0x148>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x20(%rbp),%rax
ja     1230 <sort+0x100>
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x28(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x18(%rbp)
cmpq   $0x1,-0x18(%rbp)
jb     120c <sort+0xdc>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x50(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jb     11e0 <sort+0xb0>
jmp    120c <sort+0xdc>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x18(%rbp)
jmp    11b4 <sort+0x84>
movsd  -0x50(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1188 <sort+0x58>
cmpl   $0x0,-0x3c(%rbp)
jne    123f <sort+0x10f>
jmp    1597 <sort+0x467>
mov    -0x48(%rbp),%rax
mov    -0x3c(%rbp),%ecx
mov    %ecx,%edx
add    $0xffffffff,%edx
mov    %edx,-0x3c(%rbp)
movslq %ecx,%rcx
movslq (%rax,%rcx,4),%rax
mov    %rax,-0x20(%rbp)
mov    -0x48(%rbp),%rax
mov    -0x3c(%rbp),%ecx
mov    %ecx,%edx
add    $0xffffffff,%edx
mov    %edx,-0x3c(%rbp)
movslq %ecx,%rcx
movslq (%rax,%rcx,4),%rax
mov    %rax,-0x38(%rbp)
jmp    1592 <sort+0x462>
mov    -0x38(%rbp),%rax
add    -0x20(%rbp),%rax
shr    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    1329 <sort+0x1f9>
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    1387 <sort+0x257>
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    13e8 <sort+0x2b8>
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x50(%rbp)
jmp    1413 <sort+0x2e3>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x50(%rbp),%xmm0
ucomisd %xmm1,%xmm0
ja     1413 <sort+0x2e3>
jmp    1440 <sort+0x310>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x50(%rbp),%xmm0
ja     1440 <sort+0x310>
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    1477 <sort+0x347>
jmp    14ba <sort+0x38a>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    140e <sort+0x2de>
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x50(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x3c(%rbp)
cmpl   $0x32,-0x3c(%rbp)
jle    1505 <sort+0x3d5>
lea    0xb00(%rip),%rdi
call   1030 <nrerror@plt>
mov    -0x20(%rbp),%rax
sub    -0x18(%rbp),%rax
add    $0x1,%rax
mov    -0x28(%rbp),%rcx
sub    -0x38(%rbp),%rcx
cmp    %rcx,%rax
jb     155a <sort+0x42a>
mov    -0x20(%rbp),%rax
mov    %eax,%edx
mov    -0x48(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x18(%rbp),%rax
mov    %eax,%edx
mov    -0x48(%rbp),%rax
mov    -0x3c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x28(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    158d <sort+0x45d>
mov    -0x28(%rbp),%rax
sub    $0x1,%rax
mov    %eax,%edx
mov    -0x48(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x38(%rbp),%rax
mov    %eax,%edx
mov    -0x48(%rbp),%rax
mov    -0x3c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x18(%rbp),%rax
mov    %rax,-0x38(%rbp)
jmp    1592 <sort+0x462>
jmp    116a <sort+0x3a>
mov    -0x48(%rbp),%rdi
mov    $0x1,%esi
mov    $0x32,%edx
call   1040 <free_ivector@plt>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sort>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %rsi,%rbx
mov    %rdi,%r14
mov    $0x1,%edi
mov    $0x32,%esi
call   1050 <ivector@plt>
mov    %rax,%rdi
xor    %ebp,%ebp
mov    $0x1,%r12d
mov    %rax,(%rsp)
jmp    1180 <sort+0x50>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %r14d,(%rdi,%rcx,4)
mov    %r13d,0x4(%rdi,%rax,4)
add    $0xffffffffffffffff,%r15
mov    %r15,%r14
lea    0x1(%r14),%r9
mov    %ebp,%r8d
mov    %r14,0x10(%rsp)
mov    %r9,0x8(%rsp)
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %r14,%rax
sub    %r12,%rax
cmp    $0x6,%rax
jbe    1308 <sort+0x1d8>
lea    (%r12,%r14,1),%rax
and    $0xfffffffffffffffe,%rax
movsd  (%rbx,%rax,4),%xmm0
movsd  0x8(%rbx,%r12,8),%xmm1
movsd  %xmm1,(%rbx,%rax,4)
movsd  %xmm0,0x8(%rbx,%r12,8)
movsd  (%rbx,%r14,8),%xmm1
ucomisd %xmm1,%xmm0
jbe    11f0 <sort+0xc0>
movsd  %xmm1,0x8(%rbx,%r12,8)
movsd  %xmm0,(%rbx,%r14,8)
jmp    11f4 <sort+0xc4>
nopl   0x0(%rax,%rax,1)
movapd %xmm1,%xmm0
movsd  (%rbx,%r12,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    1212 <sort+0xe2>
movsd  %xmm0,(%rbx,%r12,8)
movsd  %xmm1,(%rbx,%r14,8)
movsd  (%rbx,%r12,8),%xmm1
movsd  0x8(%rbx,%r12,8),%xmm0
ucomisd %xmm1,%xmm0
jbe    1230 <sort+0x100>
movsd  %xmm1,0x8(%rbx,%r12,8)
movsd  %xmm0,(%rbx,%r12,8)
jmp    1234 <sort+0x104>
xchg   %ax,%ax
movapd %xmm1,%xmm0
lea    0x1(%r12),%r13
mov    %r14,%r15
nopl   0x0(%rax)
movsd  0x8(%rbx,%r13,8),%xmm1
add    $0x1,%r13
ucomisd %xmm1,%xmm0
ja     1240 <sort+0x110>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  -0x8(%rbx,%r15,8),%xmm2
add    $0xffffffffffffffff,%r15
ucomisd %xmm0,%xmm2
ja     1260 <sort+0x130>
cmp    %r13,%r15
jb     1290 <sort+0x160>
movsd  %xmm2,(%rbx,%r13,8)
movsd  %xmm1,(%rbx,%r15,8)
jmp    1240 <sort+0x110>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  %xmm2,(%rbx,%r12,8)
movsd  %xmm0,(%rbx,%r15,8)
lea    0x2(%r8),%ebp
cmp    $0x31,%r8d
jl     12c6 <sort+0x196>
lea    0xd53(%rip),%rdi
mov    %r8,%r14
call   1030 <nrerror@plt>
mov    0x8(%rsp),%r9
mov    %r14,%r8
mov    (%rsp),%rdi
mov    0x10(%rsp),%r14
mov    %r9,%rdx
sub    %r13,%rdx
mov    %r15,%rsi
sub    %r12,%rsi
movslq %ebp,%rcx
movslq %r8d,%rax
cmp    %rsi,%rdx
jae    1170 <sort+0x40>
add    $0xffffffff,%r15d
mov    %r15d,(%rdi,%rcx,4)
mov    %r12d,0x4(%rdi,%rax,4)
mov    %r13,%r12
mov    %ebp,%r8d
jmp    11a0 <sort+0x70>
nopl   0x0(%rax)
xor    %eax,%eax
movsd  %xmm0,0x8(%rbx,%rax,8)
lea    0x1(%r12),%rcx
cmp    %r14,%rcx
ja     1350 <sort+0x220>
mov    %r12,%rax
mov    %rcx,%r12
movsd  (%rbx,%rcx,8),%xmm0
test   %rax,%rax
je     1300 <sort+0x1d0>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsd  (%rbx,%rax,8),%xmm1
ucomisd %xmm1,%xmm0
jae    1302 <sort+0x1d2>
movsd  %xmm1,0x8(%rbx,%rax,8)
add    $0xffffffffffffffff,%rax
jne    1330 <sort+0x200>
jmp    1300 <sort+0x1d0>
nopl   0x0(%rax)
test   %r8d,%r8d
je     136d <sort+0x23d>
movslq %r8d,%rax
movslq (%rdi,%rax,4),%r14
add    $0xfffffffe,%r8d
movslq -0x4(%rdi,%rax,4),%r12
mov    %r8d,%ebp
jmp    1180 <sort+0x50>
mov    $0x1,%esi
mov    $0x32,%edx
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1040 <free_ivector@plt>

LLVM IR (-O0):
@.str = [26 x i8] c"NSTACK too small in sort.\00"
define void @sort(i64 %0, double* %1) {
%3 = alloca i64
%4 = alloca double*
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64
%10 = alloca i32
%11 = alloca i32*
%12 = alloca double
%13 = alloca double
store i64 %0, i64* %3
store double* %1, double** %4
%14 = load i64, i64* %3
store i64 %14, i64* %6
store i64 1, i64* %9
store i32 0, i32* %10
%15 = call i32* @ivector(i32 1, i32 50)
store i32* %15, i32** %11
br label %16
16: ; preds = %302, %2
%17 = load i64, i64* %6
%18 = load i64, i64* %9
%19 = sub i64 %17, %18
%20 = icmp ult i64 %19, 7
br i1 %20, label %21, label %86
21: ; preds = %16
%22 = load i64, i64* %9
%23 = add i64 %22, 1
store i64 %23, i64* %7
br label %24
24: ; preds = %64, %21
%25 = load i64, i64* %7
%26 = load i64, i64* %6
%27 = icmp ule i64 %25, %26
br i1 %27, label %28, label %67
28: ; preds = %24
%29 = load double*, double** %4
%30 = load i64, i64* %7
%31 = getelementptr inbounds double, double* %29, i64 %30
%32 = load double, double* %31
store double %32, double* %12
%33 = load i64, i64* %7
%34 = sub i64 %33, 1
store i64 %34, i64* %5
br label %35
35: ; preds = %55, %28
%36 = load i64, i64* %5
%37 = icmp uge i64 %36, 1
br i1 %37, label %38, label %58
38: ; preds = %35
%39 = load double*, double** %4
%40 = load i64, i64* %5
%41 = getelementptr inbounds double, double* %39, i64 %40
%42 = load double, double* %41
%43 = load double, double* %12
%44 = fcmp ole double %42, %43
br i1 %44, label %45, label %46
45: ; preds = %38
br label %58
46: ; preds = %38
%47 = load double*, double** %4
%48 = load i64, i64* %5
%49 = getelementptr inbounds double, double* %47, i64 %48
%50 = load double, double* %49
%51 = load double*, double** %4
%52 = load i64, i64* %5
%53 = add i64 %52, 1
%54 = getelementptr inbounds double, double* %51, i64 %53
store double %50, double* %54
br label %55
55: ; preds = %46
%56 = load i64, i64* %5
%57 = add i64 %56, -1
store i64 %57, i64* %5
br label %35
58: ; preds = %45, %35
%59 = load double, double* %12
%60 = load double*, double** %4
%61 = load i64, i64* %5
%62 = add i64 %61, 1
%63 = getelementptr inbounds double, double* %60, i64 %62
store double %59, double* %63
br label %64
64: ; preds = %58
%65 = load i64, i64* %7
%66 = add i64 %65, 1
store i64 %66, i64* %7
br label %24
67: ; preds = %24
%68 = load i32, i32* %10
%69 = icmp eq i32 %68, 0
br i1 %69, label %70, label %71
70: ; preds = %67
br label %303
71: ; preds = %67
%72 = load i32*, i32** %11
%73 = load i32, i32* %10
%74 = add nsw i32 %73, -1
store i32 %74, i32* %10
%75 = sext i32 %73 to i64
%76 = getelementptr inbounds i32, i32* %72, i64 %75
%77 = load i32, i32* %76
%78 = sext i32 %77 to i64
store i64 %78, i64* %6
%79 = load i32*, i32** %11
%80 = load i32, i32* %10
%81 = add nsw i32 %80, -1
store i32 %81, i32* %10
%82 = sext i32 %80 to i64
%83 = getelementptr inbounds i32, i32* %79, i64 %82
%84 = load i32, i32* %83
%85 = sext i32 %84 to i64
store i64 %85, i64* %9
br label %302
86: ; preds = %16
%87 = load i64, i64* %9
%88 = load i64, i64* %6
%89 = add i64 %87, %88
%90 = lshr i64 %89, 1
store i64 %90, i64* %8
%91 = load double*, double** %4
%92 = load i64, i64* %8
%93 = getelementptr inbounds double, double* %91, i64 %92
%94 = load double, double* %93
store double %94, double* %13
%95 = load double*, double** %4
%96 = load i64, i64* %9
%97 = add i64 %96, 1
%98 = getelementptr inbounds double, double* %95, i64 %97
%99 = load double, double* %98
%100 = load double*, double** %4
%101 = load i64, i64* %8
%102 = getelementptr inbounds double, double* %100, i64 %101
store double %99, double* %102
%103 = load double, double* %13
%104 = load double*, double** %4
%105 = load i64, i64* %9
%106 = add i64 %105, 1
%107 = getelementptr inbounds double, double* %104, i64 %106
store double %103, double* %107
%108 = load double*, double** %4
%109 = load i64, i64* %9
%110 = add i64 %109, 1
%111 = getelementptr inbounds double, double* %108, i64 %110
%112 = load double, double* %111
%113 = load double*, double** %4
%114 = load i64, i64* %6
%115 = getelementptr inbounds double, double* %113, i64 %114
%116 = load double, double* %115
%117 = fcmp ogt double %112, %116
br i1 %117, label %118, label %136
118: ; preds = %86
%119 = load double*, double** %4
%120 = load i64, i64* %9
%121 = add i64 %120, 1
%122 = getelementptr inbounds double, double* %119, i64 %121
%123 = load double, double* %122
store double %123, double* %13
%124 = load double*, double** %4
%125 = load i64, i64* %6
%126 = getelementptr inbounds double, double* %124, i64 %125
%127 = load double, double* %126
%128 = load double*, double** %4
%129 = load i64, i64* %9
%130 = add i64 %129, 1
%131 = getelementptr inbounds double, double* %128, i64 %130
store double %127, double* %131
%132 = load double, double* %13
%133 = load double*, double** %4
%134 = load i64, i64* %6
%135 = getelementptr inbounds double, double* %133, i64 %134
store double %132, double* %135
br label %136
136: ; preds = %118, %86
%137 = load double*, double** %4
%138 = load i64, i64* %9
%139 = getelementptr inbounds double, double* %137, i64 %138
%140 = load double, double* %139
%141 = load double*, double** %4
%142 = load i64, i64* %6
%143 = getelementptr inbounds double, double* %141, i64 %142
%144 = load double, double* %143
%145 = fcmp ogt double %140, %144
br i1 %145, label %146, label %162
146: ; preds = %136
%147 = load double*, double** %4
%148 = load i64, i64* %9
%149 = getelementptr inbounds double, double* %147, i64 %148
%150 = load double, double* %149
store double %150, double* %13
%151 = load double*, double** %4
%152 = load i64, i64* %6
%153 = getelementptr inbounds double, double* %151, i64 %152
%154 = load double, double* %153
%155 = load double*, double** %4
%156 = load i64, i64* %9
%157 = getelementptr inbounds double, double* %155, i64 %156
store double %154, double* %157
%158 = load double, double* %13
%159 = load double*, double** %4
%160 = load i64, i64* %6
%161 = getelementptr inbounds double, double* %159, i64 %160
store double %158, double* %161
br label %162
162: ; preds = %146, %136
%163 = load double*, double** %4
%164 = load i64, i64* %9
%165 = add i64 %164, 1
%166 = getelementptr inbounds double, double* %163, i64 %165
%167 = load double, double* %166
%168 = load double*, double** %4
%169 = load i64, i64* %9
%170 = getelementptr inbounds double, double* %168, i64 %169
%171 = load double, double* %170
%172 = fcmp ogt double %167, %171
br i1 %172, label %173, label %191
173: ; preds = %162
%174 = load double*, double** %4
%175 = load i64, i64* %9
%176 = add i64 %175, 1
%177 = getelementptr inbounds double, double* %174, i64 %176
%178 = load double, double* %177
store double %178, double* %13
%179 = load double*, double** %4
%180 = load i64, i64* %9
%181 = getelementptr inbounds double, double* %179, i64 %180
%182 = load double, double* %181
%183 = load double*, double** %4
%184 = load i64, i64* %9
%185 = add i64 %184, 1
%186 = getelementptr inbounds double, double* %183, i64 %185
store double %182, double* %186
%187 = load double, double* %13
%188 = load double*, double** %4
%189 = load i64, i64* %9
%190 = getelementptr inbounds double, double* %188, i64 %189
store double %187, double* %190
br label %191
191: ; preds = %173, %162
%192 = load i64, i64* %9
%193 = add i64 %192, 1
store i64 %193, i64* %5
%194 = load i64, i64* %6
store i64 %194, i64* %7
%195 = load double*, double** %4
%196 = load i64, i64* %9
%197 = getelementptr inbounds double, double* %195, i64 %196
%198 = load double, double* %197
store double %198, double* %12
br label %199
199: ; preds = %226, %191
br label %200
200: ; preds = %203, %199
%201 = load i64, i64* %5
%202 = add i64 %201, 1
store i64 %202, i64* %5
br label %203
203: ; preds = %200
%204 = load double*, double** %4
%205 = load i64, i64* %5
%206 = getelementptr inbounds double, double* %204, i64 %205
%207 = load double, double* %206
%208 = load double, double* %12
%209 = fcmp olt double %207, %208
br i1 %209, label %200, label %210
210: ; preds = %203
br label %211
211: ; preds = %214, %210
%212 = load i64, i64* %7
%213 = add i64 %212, -1
store i64 %213, i64* %7
br label %214
214: ; preds = %211
%215 = load double*, double** %4
%216 = load i64, i64* %7
%217 = getelementptr inbounds double, double* %215, i64 %216
%218 = load double, double* %217
%219 = load double, double* %12
%220 = fcmp ogt double %218, %219
br i1 %220, label %211, label %221
221: ; preds = %214
%222 = load i64, i64* %7
%223 = load i64, i64* %5
%224 = icmp ult i64 %222, %223
br i1 %224, label %225, label %226
225: ; preds = %221
br label %242
226: ; preds = %221
%227 = load double*, double** %4
%228 = load i64, i64* %5
%229 = getelementptr inbounds double, double* %227, i64 %228
%230 = load double, double* %229
store double %230, double* %13
%231 = load double*, double** %4
%232 = load i64, i64* %7
%233 = getelementptr inbounds double, double* %231, i64 %232
%234 = load double, double* %233
%235 = load double*, double** %4
%236 = load i64, i64* %5
%237 = getelementptr inbounds double, double* %235, i64 %236
store double %234, double* %237
%238 = load double, double* %13
%239 = load double*, double** %4
%240 = load i64, i64* %7
%241 = getelementptr inbounds double, double* %239, i64 %240
store double %238, double* %241
br label %199
242: ; preds = %225
%243 = load double*, double** %4
%244 = load i64, i64* %7
%245 = getelementptr inbounds double, double* %243, i64 %244
%246 = load double, double* %245
%247 = load double*, double** %4
%248 = load i64, i64* %9
%249 = getelementptr inbounds double, double* %247, i64 %248
store double %246, double* %249
%250 = load double, double* %12
%251 = load double*, double** %4
%252 = load i64, i64* %7
%253 = getelementptr inbounds double, double* %251, i64 %252
store double %250, double* %253
%254 = load i32, i32* %10
%255 = add nsw i32 %254, 2
store i32 %255, i32* %10
%256 = load i32, i32* %10
%257 = icmp sgt i32 %256, 50
br i1 %257, label %258, label %260
258: ; preds = %242
%259 = call i32 @nrerror(i8* getelementptr inbounds ([26 x i8], [26 x i8]* @.str, i64 0, i64 0))
br label %260
260: ; preds = %258, %242
%261 = load i64, i64* %6
%262 = load i64, i64* %5
%263 = sub i64 %261, %262
%264 = add i64 %263, 1
%265 = load i64, i64* %7
%266 = load i64, i64* %9
%267 = sub i64 %265, %266
%268 = icmp uge i64 %264, %267
br i1 %268, label %269, label %285
269: ; preds = %260
%270 = load i64, i64* %6
%271 = trunc i64 %270 to i32
%272 = load i32*, i32** %11
%273 = load i32, i32* %10
%274 = sext i32 %273 to i64
%275 = getelementptr inbounds i32, i32* %272, i64 %274
store i32 %271, i32* %275
%276 = load i64, i64* %5
%277 = trunc i64 %276 to i32
%278 = load i32*, i32** %11
%279 = load i32, i32* %10
%280 = sub nsw i32 %279, 1
%281 = sext i32 %280 to i64
%282 = getelementptr inbounds i32, i32* %278, i64 %281
store i32 %277, i32* %282
%283 = load i64, i64* %7
%284 = sub i64 %283, 1
store i64 %284, i64* %6
br label %301
285: ; preds = %260
%286 = load i64, i64* %7
%287 = sub i64 %286, 1
%288 = trunc i64 %287 to i32
%289 = load i32*, i32** %11
%290 = load i32, i32* %10
%291 = sext i32 %290 to i64
%292 = getelementptr inbounds i32, i32* %289, i64 %291
store i32 %288, i32* %292
%293 = load i64, i64* %9
%294 = trunc i64 %293 to i32
%295 = load i32*, i32** %11
%296 = load i32, i32* %10
%297 = sub nsw i32 %296, 1
%298 = sext i32 %297 to i64
%299 = getelementptr inbounds i32, i32* %295, i64 %298
store i32 %294, i32* %299
%300 = load i64, i64* %5
store i64 %300, i64* %9
br label %301
301: ; preds = %285, %269
br label %302
302: ; preds = %301, %71
br label %16
303: ; preds = %70
%304 = load i32*, i32** %11
%305 = call i32 @free_ivector(i32* %304, i32 1, i32 50)
ret void
}

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