void *partition(void *base, int n, int size, void *index,
                int (*compare)(const void *, const void *)) {
  int i;
  char *store = (char *)base;
  char *basec = (char *)base;
  swap(index, basec + (n - 1) * size, size);
  for (i = 0; i < n - 1; i++) {
    if (compare(basec + i * size, basec + (n - 1) * size) <= 0) {
      swap(basec + i * size, store, size);
      store += size;
    }
  }
  swap(store, basec + (n - 1) * size, size);
  return store;
}


x86 assembly (clang, -O0):
<partition>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x18(%rbp),%rdi
mov    -0x38(%rbp),%rsi
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
imul   -0x10(%rbp),%eax
cltq
add    %rax,%rsi
mov    -0x10(%rbp),%edx
mov    $0x0,%al
call   1030 <swap@plt>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    11e9 <partition+0xd9>
mov    -0x20(%rbp),%rax
mov    -0x38(%rbp),%rdi
mov    -0x24(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
add    %rcx,%rdi
mov    -0x38(%rbp),%rsi
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
add    %rcx,%rsi
call   *%rax
cmp    $0x0,%eax
jg     11d6 <partition+0xc6>
mov    -0x38(%rbp),%rdi
mov    -0x24(%rbp),%eax
imul   -0x10(%rbp),%eax
cltq
add    %rax,%rdi
mov    -0x30(%rbp),%rsi
mov    -0x10(%rbp),%edx
mov    $0x0,%al
call   1030 <swap@plt>
mov    -0x10(%rbp),%ecx
mov    -0x30(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x30(%rbp)
jmp    11db <partition+0xcb>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1162 <partition+0x52>
mov    -0x30(%rbp),%rdi
mov    -0x38(%rbp),%rsi
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
imul   -0x10(%rbp),%eax
cltq
add    %rax,%rsi
mov    -0x10(%rbp),%edx
mov    $0x0,%al
call   1030 <swap@plt>
mov    -0x30(%rbp),%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<partition>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %r8,%r15
mov    %edx,%ebx
mov    %esi,%r13d
mov    %rdi,%rbp
lea    -0x1(%r13),%r14d
mov    %r14d,%eax
imul   %edx,%eax
movslq %eax,%r12
add    %rdi,%r12
mov    %rcx,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1030 <swap@plt>
cmp    $0x2,%r13d
mov    %ebx,0x4(%rsp)
jl     118c <partition+0x7c>
movslq %ebx,%rbx
mov    %r14d,%r14d
mov    %rbp,%r13
jmp    1169 <partition+0x59>
nopl   0x0(%rax,%rax,1)
add    %rbx,%rbp
add    $0xffffffffffffffff,%r14
je     118f <partition+0x7f>
mov    %rbp,%rdi
mov    %r12,%rsi
call   *%r15
test   %eax,%eax
jg     1160 <partition+0x50>
mov    %rbp,%rdi
mov    %r13,%rsi
mov    0x4(%rsp),%edx
xor    %eax,%eax
call   1030 <swap@plt>
add    %rbx,%r13
jmp    1160 <partition+0x50>
mov    %rbp,%r13
mov    %r13,%rdi
mov    %r12,%rsi
mov    0x4(%rsp),%edx
xor    %eax,%eax
call   1030 <swap@plt>
mov    %r13,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i8* @partition(i8* %0, i32 %1, i32 %2, i8* %3, i32 (i8*, i8*)* nocapture %4) {
%6 = add nsw i32 %1, -1
%7 = mul nsw i32 %6, %2
%8 = sext i32 %7 to i64
%9 = getelementptr inbounds i8, i8* %0, i64 %8
%10 = tail call i32 (i8*, i8*, i32, ...) bitcast (i32 (...)* @swap to i32 (i8*, i8*, i32, ...)*)(i8* %3, i8* %9, i32 %2)
%11 = icmp sgt i32 %1, 1
br i1 %11, label %12, label %29
12: ; preds = %5
%13 = sext i32 %2 to i64
%14 = zext i32 %6 to i64
br label %15
15: ; preds = %12, %25
%16 = phi i64 [ 0, %12 ], [ %27, %25 ]
%17 = phi i8* [ %0, %12 ], [ %26, %25 ]
%18 = mul nsw i64 %16, %13
%19 = getelementptr inbounds i8, i8* %0, i64 %18
%20 = tail call i32 %4(i8* %19, i8* %9)
%21 = icmp slt i32 %20, 1
br i1 %21, label %22, label %25
22: ; preds = %15
%23 = tail call i32 (i8*, i8*, i32, ...) bitcast (i32 (...)* @swap to i32 (i8*, i8*, i32, ...)*)(i8* %19, i8* %17, i32 %2)
%24 = getelementptr inbounds i8, i8* %17, i64 %13
br label %25
25: ; preds = %15, %22
%26 = phi i8* [ %24, %22 ], [ %17, %15 ]
%27 = add nuw nsw i64 %16, 1
%28 = icmp eq i64 %27, %14
br i1 %28, label %29, label %15
29: ; preds = %25, %5
%30 = phi i8* [ %0, %5 ], [ %26, %25 ]
%31 = tail call i32 (i8*, i8*, i32, ...) bitcast (i32 (...)* @swap to i32 (i8*, i8*, i32, ...)*)(i8* %30, i8* %9, i32 %2)
ret i8* %30
}