void strsort(char **argv, int n, int (*fn)(const char *, const char *)) {
  register int i;
  register int j;
  register int m;
  register char **ap;
  char *s;
  int k;
  for (j = 1; j <= n; j *= 2)
    ;
  for (m = 2 * j - 1; m /= 2;)
    for (j = 0, k = n - m; j < k; j++)
      for (i = j; i >= 0; i -= m) {
        ap = &argv[i];
        if ((*fn)(ap[m], ap[0]) >= 0)
          break;
        s = ap[m];
        ap[m] = ap[0];
        ap[0] = s;
      }
}


x86 assembly (clang, -O0):
<strsort>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1139 <strsort+0x39>
jmp    112b <strsort+0x2b>
mov    -0x20(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    111a <strsort+0x1a>
mov    -0x20(%rbp),%eax
shl    $0x1,%eax
sub    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x24(%rbp)
cmp    $0x0,%eax
je     1218 <strsort+0x118>
movl   $0x0,-0x20(%rbp)
mov    -0xc(%rbp),%eax
sub    -0x24(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x3c(%rbp),%eax
jge    1213 <strsort+0x113>
mov    -0x20(%rbp),%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jl     1200 <strsort+0x100>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x30(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x30(%rbp),%rcx
movslq -0x24(%rbp),%rdx
mov    (%rcx,%rdx,8),%rdi
mov    -0x30(%rbp),%rcx
mov    (%rcx),%rsi
call   *%rax
cmp    $0x0,%eax
jl     11c2 <strsort+0xc2>
jmp    1200 <strsort+0x100>
mov    -0x30(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x38(%rbp)
mov    -0x30(%rbp),%rax
mov    (%rax),%rdx
mov    -0x30(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x38(%rbp),%rcx
mov    -0x30(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x24(%rbp),%ecx
mov    -0x1c(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x1c(%rbp)
jmp    117e <strsort+0x7e>
jmp    1205 <strsort+0x105>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    116c <strsort+0x6c>
jmp    1145 <strsort+0x45>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<strsort>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %rdx,%r15
mov    %rdi,%rbp
mov    $0x1,%r13d
nopw   0x0(%rax,%rax,1)
mov    %r13d,%eax
lea    (%rax,%rax,1),%r13d
cmp    %esi,%eax
jle    1120 <strsort+0x20>
cmp    $0x2,%eax
jae    113f <strsort+0x3f>
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
add    $0xffffffff,%r13d
mov    %esi,0xc(%rsp)
jmp    115d <strsort+0x5d>
nopl   0x0(%rax)
lea    0x1(%r13),%eax
cmp    $0x3,%eax
mov    0xc(%rsp),%esi
jb     1130 <strsort+0x30>
mov    %r13d,%eax
shr    $0x1f,%eax
add    %r13d,%eax
mov    %eax,%r13d
sar    %r13d
sub    %r13d,%esi
mov    %esi,0x10(%rsp)
test   %esi,%esi
jle    1150 <strsort+0x50>
movslq %r13d,%rbx
xor    %r14d,%r14d
jmp    1190 <strsort+0x90>
nop
mov    0x14(%rsp),%r14d
add    $0x1,%r14d
cmp    0x10(%rsp),%r14d
je     1150 <strsort+0x50>
mov    %r14d,0x14(%rsp)
cs nopw 0x0(%rax,%rax,1)
nop
mov    %r14d,%eax
lea    0x0(,%rax,8),%r12
add    %rbp,%r12
mov    (%r12,%rbx,8),%rdi
mov    0x0(%rbp,%rax,8),%rsi
call   *%r15
test   %eax,%eax
jns    1180 <strsort+0x80>
mov    (%r12,%rbx,8),%rax
mov    (%r12),%rcx
mov    %rcx,(%r12,%rbx,8)
mov    %rax,(%r12)
sub    %r13d,%r14d
jns    11a0 <strsort+0xa0>
jmp    1180 <strsort+0x80>

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

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