int rfibsearch(int a[], int n, int p, int q, int r, int key) {
  int t;
  if (p < 1 || p > n)
    return 0;
  else if (key == a[p])
    return p;
  else if (key < a[p]) {
    if (r == 0)
      return 0;
    else {
      p = p - r;
      t = q;
      q = r;
      r = t - r;
      return rfibsearch(a, n, p, q, r, key);
    }
  } else {
    if (q == 1)
      return 0;
    else {
      p = p + r;
      q = q - r;
      r = r - q;
      return rfibsearch(a, n, p, q, r, key);
    }
  }
}


x86 assembly (clang, -O0):
<rfibsearch>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
mov    %r9d,-0x24(%rbp)
cmpl   $0x1,-0x18(%rbp)
jl     1143 <rfibsearch+0x33>
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jle    114f <rfibsearch+0x3f>
movl   $0x0,-0x4(%rbp)
jmp    1226 <rfibsearch+0x116>
mov    -0x24(%rbp),%eax
mov    -0x10(%rbp),%rcx
movslq -0x18(%rbp),%rdx
cmp    (%rcx,%rdx,4),%eax
jne    116e <rfibsearch+0x5e>
mov    -0x18(%rbp),%eax
mov    %eax,-0x4(%rbp)
jmp    1226 <rfibsearch+0x116>
mov    -0x24(%rbp),%eax
mov    -0x10(%rbp),%rcx
movslq -0x18(%rbp),%rdx
cmp    (%rcx,%rdx,4),%eax
jge    11d8 <rfibsearch+0xc8>
cmpl   $0x0,-0x20(%rbp)
jne    1198 <rfibsearch+0x88>
movl   $0x0,-0x4(%rbp)
jmp    1226 <rfibsearch+0x116>
mov    -0x18(%rbp),%eax
sub    -0x20(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x28(%rbp),%eax
sub    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x14(%rbp),%esi
mov    -0x18(%rbp),%edx
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%r8d
mov    -0x24(%rbp),%r9d
call   1030 <rfibsearch@plt>
mov    %eax,-0x4(%rbp)
jmp    1226 <rfibsearch+0x116>
cmpl   $0x1,-0x1c(%rbp)
jne    11ee <rfibsearch+0xde>
movl   $0x0,-0x4(%rbp)
jmp    1226 <rfibsearch+0x116>
mov    -0x18(%rbp),%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
sub    -0x20(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x20(%rbp),%eax
sub    -0x1c(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x14(%rbp),%esi
mov    -0x18(%rbp),%edx
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%r8d
mov    -0x24(%rbp),%r9d
call   1030 <rfibsearch@plt>
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<rfibsearch>:
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
test   %edx,%edx
jle    1152 <rfibsearch+0x52>
cmp    %esi,%edx
jg     1152 <rfibsearch+0x52>
mov    %edx,%r10d
cmp    %r9d,(%rdi,%r10,4)
je     1150 <rfibsearch+0x50>
jle    1140 <rfibsearch+0x40>
test   %r8d,%r8d
je     1152 <rfibsearch+0x52>
sub    %r8d,%edx
mov    %ecx,%r10d
sub    %r8d,%r10d
mov    %r8d,%ecx
mov    %r10d,%r8d
jmp    1110 <rfibsearch+0x10>
nopl   0x0(%rax)
cmp    $0x1,%ecx
je     1152 <rfibsearch+0x52>
add    %r8d,%edx
sub    %r8d,%ecx
sub    %ecx,%r8d
jmp    1110 <rfibsearch+0x10>
mov    %edx,%eax
ret

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

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