double sortREALByINT(double *item, int *weight, int size, int offset,
                     unsigned char unique) {
  int i, ii, saveW;
  double saveI;
  for (i = 1; i < size; i++) {
    ii = i + offset - 1;
    while ((ii >= offset) && (weight[ii] >= weight[ii + 1])) {
      if (weight[ii] == weight[ii + 1]) {
        if (unique)
          return (item[ii]);
      } else {
        saveI = item[ii];
        saveW = weight[ii];
        item[ii] = item[ii + 1];
        weight[ii] = weight[ii + 1];
        item[ii + 1] = saveI;
        weight[ii + 1] = saveW;
      }
      ii--;
    }
  }
  return (0);
}


x86 assembly (clang, -O0):
<sortREALByINT>:
push   %rbp
mov    %rsp,%rbp
mov    %r8b,%al
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %ecx,-0x20(%rbp)
mov    %al,-0x21(%rbp)
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1265 <sortREALByINT+0x165>
mov    -0x28(%rbp),%eax
add    -0x20(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%ecx
xor    %eax,%eax
cmp    -0x20(%rbp),%ecx
mov    %al,-0x39(%rbp)
jl     1169 <sortREALByINT+0x69>
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x18(%rbp),%rcx
mov    -0x2c(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
cmp    (%rcx,%rdx,4),%eax
setge  %al
mov    %al,-0x39(%rbp)
mov    -0x39(%rbp),%al
test   $0x1,%al
jne    1179 <sortREALByINT+0x79>
jmp    1252 <sortREALByINT+0x152>
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x18(%rbp),%rcx
mov    -0x2c(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
cmp    (%rcx,%rdx,4),%eax
jne    11c0 <sortREALByINT+0xc0>
cmpb   $0x0,-0x21(%rbp)
je     11bb <sortREALByINT+0xbb>
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    126d <sortREALByINT+0x16d>
jmp    1244 <sortREALByINT+0x144>
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
movsd  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%edx
mov    -0x18(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
jmp    1137 <sortREALByINT+0x37>
jmp    1257 <sortREALByINT+0x157>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    111f <sortREALByINT+0x1f>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<sortREALByINT>:
push   %rbp
push   %rbx
xorps  %xmm0,%xmm0
cmp    $0x2,%edx
jl     1178 <sortREALByINT+0x78>
movslq %ecx,%r10
mov    $0x1,%r9d
jmp    1129 <sortREALByINT+0x29>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r9d
cmp    %edx,%r9d
je     1178 <sortREALByINT+0x78>
add    $0x1,%ecx
movslq %ecx,%rax
mov    (%rsi,%rax,4),%r11d
jmp    115e <sortREALByINT+0x5e>
cs nopw 0x0(%rax,%rax,1)
nop
movups -0x8(%rdi,%rax,8),%xmm1
mov    %r11d,-0x4(%rsi,%rax,4)
shufps $0x4e,%xmm1,%xmm1
movups %xmm1,-0x8(%rdi,%rax,8)
mov    %ebp,(%rsi,%rax,4)
mov    %rbx,%rax
cmp    %r10,%rbx
jle    1120 <sortREALByINT+0x20>
lea    -0x1(%rax),%rbx
mov    -0x4(%rsi,%rax,4),%ebp
cmp    %r11d,%ebp
jl     1120 <sortREALByINT+0x20>
jne    1140 <sortREALByINT+0x40>
test   %r8b,%r8b
je     1156 <sortREALByINT+0x56>
movsd  -0x8(%rdi,%rax,8),%xmm0
pop    %rbx
pop    %rbp
ret

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

LLVM IR (-O2):
define double @sortREALByINT(double* nocapture %0, i32* nocapture %1, i32 %2, i32 %3, i8 zeroext %4) {
%6 = icmp sgt i32 %2, 1
br i1 %6, label %7, label %41
7: ; preds = %5
%8 = icmp eq i8 %4, 0
%9 = sext i32 %3 to i64
br label %10
10: ; preds = %7, %38
%11 = phi i32 [ %3, %7 ], [ %13, %38 ]
%12 = phi i32 [ 1, %7 ], [ %39, %38 ]
%13 = add i32 %11, 1
%14 = sext i32 %13 to i64
%15 = getelementptr inbounds i32, i32* %1, i64 %14
%16 = load i32, i32* %15
br label %17
17: ; preds = %10, %36
%18 = phi i64 [ %14, %10 ], [ %19, %36 ]
%19 = add nsw i64 %18, -1
%20 = getelementptr inbounds i32, i32* %1, i64 %19
%21 = load i32, i32* %20
%22 = getelementptr inbounds i32, i32* %1, i64 %18
%23 = icmp slt i32 %21, %16
br i1 %23, label %38, label %24
24: ; preds = %17
%25 = icmp eq i32 %21, %16
br i1 %25, label %26, label %30
26: ; preds = %24
br i1 %8, label %36, label %27
27: ; preds = %26
%28 = getelementptr inbounds double, double* %0, i64 %19
%29 = load double, double* %28
br label %41
30: ; preds = %24
%31 = getelementptr inbounds double, double* %0, i64 %19
%32 = bitcast double* %31 to <2 x double>*
%33 = load <2 x double>, <2 x double>* %32
store i32 %16, i32* %20
%34 = shufflevector <2 x double> %33, <2 x double> poison, <2 x i32> <i32 1, i32 0>
%35 = bitcast double* %31 to <2 x double>*
store <2 x double> %34, <2 x double>* %35
store i32 %21, i32* %22
br label %36
36: ; preds = %26, %30
%37 = icmp sgt i64 %19, %9
br i1 %37, label %17, label %38
38: ; preds = %17, %36
%39 = add nuw nsw i32 %12, 1
%40 = icmp eq i32 %39, %2
br i1 %40, label %41, label %10
41: ; preds = %38, %5, %27
%42 = phi double [ %29, %27 ], [ 0.000000e+00, %5 ], [ 0.000000e+00, %38 ]
ret double %42
}