int particion(int lista[], int f, int l) {
  int pivote = lista[f];
  int izq = f + 1;
  int der = l;
  int temp;
  int done = 0;
  while (!done) {
    while (izq <= der && lista[izq] <= pivote) {
      izq = izq + 1;
    }
    while (lista[der] >= pivote && der >= izq) {
      der = der - 1;
    }
    if (der < izq) {
      done = 1;
    } else {
      temp = lista[izq];
      lista[izq] = lista[der];
      lista[der] = temp;
    }
  }
  temp = lista[f];
  lista[f] = lista[der];
  lista[der] = temp;
  return der;
}


x86 assembly (clang, -O0):
<particion>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x14(%rbp)
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x1c(%rbp)
movl   $0x0,-0x24(%rbp)
cmpl   $0x0,-0x24(%rbp)
setne  %al
xor    $0xff,%al
test   $0x1,%al
jne    1148 <particion+0x48>
jmp    1227 <particion+0x127>
jmp    114d <particion+0x4d>
mov    -0x18(%rbp),%ecx
xor    %eax,%eax
cmp    -0x1c(%rbp),%ecx
mov    %al,-0x25(%rbp)
jg     1172 <particion+0x72>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
cmp    -0x14(%rbp),%eax
setle  %al
mov    %al,-0x25(%rbp)
mov    -0x25(%rbp),%al
test   $0x1,%al
jne    1182 <particion+0x82>
jmp    1190 <particion+0x90>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    114d <particion+0x4d>
jmp    1195 <particion+0x95>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%ecx
xor    %eax,%eax
cmp    -0x14(%rbp),%ecx
mov    %al,-0x26(%rbp)
jl     11ba <particion+0xba>
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
setge  %al
mov    %al,-0x26(%rbp)
mov    -0x26(%rbp),%al
test   $0x1,%al
jne    11ca <particion+0xca>
jmp    11d8 <particion+0xd8>
mov    -0x1c(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1195 <particion+0x95>
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    11f0 <particion+0xf0>
movl   $0x1,-0x24(%rbp)
jmp    1222 <particion+0x122>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%edx
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
jmp    1132 <particion+0x32>
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%edx
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<particion>:
push   %rbx
movslq %esi,%r8
mov    (%rdi,%r8,4),%r11d
lea    0x1(%r8),%ecx
movabs $0x100000000,%r9
movabs $0xffffffff00000000,%r10
ff ff ff
cmp    %edx,%ecx
jle    1140 <particion+0x40>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movslq %edx,%rax
jmp    1165 <particion+0x65>
cs nopw 0x0(%rax,%rax,1)
nop
movslq %ecx,%rsi
movslq %edx,%rax
add    $0x1,%edx
add    $0xffffffffffffffff,%rsi
nopl   (%rax)
cmp    %r11d,0x4(%rdi,%rsi,4)
jg     1165 <particion+0x65>
add    $0x1,%ecx
add    $0x1,%rsi
cmp    %rax,%rsi
jl     1150 <particion+0x50>
mov    %edx,%ecx
movslq %ecx,%rsi
mov    %rax,%rdx
shl    $0x20,%rdx
add    %r9,%rdx
add    $0x1,%rax
cs nopw 0x0(%rax,%rax,1)
add    %r10,%rdx
mov    -0x4(%rdi,%rax,4),%ebx
add    $0xffffffffffffffff,%rax
cmp    %r11d,%ebx
jl     1195 <particion+0x95>
cmp    %rsi,%rax
jge    1180 <particion+0x80>
cmp    %eax,%ecx
jg     11aa <particion+0xaa>
mov    (%rdi,%rsi,4),%edx
mov    %ebx,(%rdi,%rsi,4)
mov    %edx,(%rdi,%rax,4)
mov    %eax,%edx
cmp    %edx,%ecx
jle    1140 <particion+0x40>
jmp    1130 <particion+0x30>
mov    (%rdi,%r8,4),%ecx
sar    $0x1e,%rdx
mov    (%rdi,%rdx,1),%esi
mov    %esi,(%rdi,%r8,4)
mov    %ecx,(%rdi,%rdx,1)
pop    %rbx
ret

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

LLVM IR (-O2):
define i32 @particion(i32* nocapture %0, i32 %1, i32 %2) {
%4 = sext i32 %1 to i64
%5 = getelementptr inbounds i32, i32* %0, i64 %4
%6 = load i32, i32* %5
%7 = add nsw i32 %1, 1
br label %8
8: ; preds = %43, %3
%9 = phi i32 [ %2, %3 ], [ %41, %43 ]
%10 = phi i32 [ %7, %3 ], [ %30, %43 ]
%11 = icmp sgt i32 %10, %9
br i1 %11, label %12, label %14
12: ; preds = %8
%13 = sext i32 %9 to i64
br label %28
14: ; preds = %8
%15 = sext i32 %10 to i64
%16 = sext i32 %9 to i64
%17 = add i32 %9, 1
br label %18
18: ; preds = %14, %23
%19 = phi i64 [ %15, %14 ], [ %24, %23 ]
%20 = getelementptr inbounds i32, i32* %0, i64 %19
%21 = load i32, i32* %20
%22 = icmp sgt i32 %21, %6
br i1 %22, label %26, label %23
23: ; preds = %18
%24 = add nsw i64 %19, 1
%25 = icmp slt i64 %19, %16
br i1 %25, label %18, label %28
26: ; preds = %18
%27 = trunc i64 %19 to i32
br label %28
28: ; preds = %23, %26, %12
%29 = phi i64 [ %13, %12 ], [ %16, %26 ], [ %16, %23 ]
%30 = phi i32 [ %10, %12 ], [ %27, %26 ], [ %17, %23 ]
%31 = sext i32 %30 to i64
br label %32
32: ; preds = %32, %28
%33 = phi i64 [ %39, %32 ], [ %29, %28 ]
%34 = getelementptr inbounds i32, i32* %0, i64 %33
%35 = load i32, i32* %34
%36 = icmp sge i32 %35, %6
%37 = icmp sge i64 %33, %31
%38 = select i1 %36, i1 %37, i1 false
%39 = add i64 %33, -1
br i1 %38, label %32, label %40
40: ; preds = %32
%41 = trunc i64 %33 to i32
%42 = icmp sgt i32 %30, %41
br i1 %42, label %47, label %43
43: ; preds = %40
%44 = getelementptr inbounds i32, i32* %0, i64 %33
%45 = getelementptr inbounds i32, i32* %0, i64 %31
%46 = load i32, i32* %45
store i32 %35, i32* %45
store i32 %46, i32* %44
br label %8
47: ; preds = %40
%48 = trunc i64 %33 to i32
%49 = load i32, i32* %5
%50 = shl i64 %33, 32
%51 = ashr exact i64 %50, 32
%52 = getelementptr inbounds i32, i32* %0, i64 %51
%53 = load i32, i32* %52
store i32 %53, i32* %5
store i32 %49, i32* %52
ret i32 %48
}