int r_index(str, ch, last)
char *str;
int ch;
int last;
{
  int i = 0;
  if (last) {
    for (i = strlen(str) - 1; i >= 0; i--) {
      if (str[i] == ch) {
        return (i);
      }
    }
  } else {
    for (i = 0; str[i]; i++) {
      if (str[i] == ch) {
        return (i);
      }
    }
  }
  return (-1);
}


x86 assembly (clang, -O0):
<r_index>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x0,-0x18(%rbp)
je     1185 <r_index+0x75>
mov    -0x10(%rbp),%rdi
call   1030 <strlen@plt>
sub    $0x1,%rax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jl     1180 <r_index+0x70>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    -0x14(%rbp),%eax
jne    116d <r_index+0x5d>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x4(%rbp)
jmp    11dd <r_index+0xcd>
jmp    1172 <r_index+0x62>
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
jmp    1143 <r_index+0x33>
jmp    11d6 <r_index+0xc6>
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cmpb   $0x0,(%rax,%rcx,1)
je     11d1 <r_index+0xc1>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    -0x14(%rbp),%eax
jne    11be <r_index+0xae>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x4(%rbp)
jmp    11dd <r_index+0xcd>
jmp    11c3 <r_index+0xb3>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    118c <r_index+0x7c>
jmp    11d6 <r_index+0xc6>
movl   $0xffffffff,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<r_index>:
push   %rbp
push   %rbx
push   %rax
mov    %esi,%ebp
mov    %rdi,%rbx
test   %edx,%edx
je     1141 <r_index+0x31>
mov    %rbx,%rdi
call   1030 <strlen@plt>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0xffffffff,%eax
js     1166 <r_index+0x56>
mov    %eax,%ecx
movsbl (%rbx,%rcx,1),%ecx
cmp    %ebp,%ecx
jne    1130 <r_index+0x20>
jmp    116f <r_index+0x5f>
mov    (%rbx),%dl
mov    $0xffffffff,%eax
test   %dl,%dl
je     116f <r_index+0x5f>
xor    %ecx,%ecx
xchg   %ax,%ax
movsbl %dl,%edx
cmp    %ebp,%edx
je     116d <r_index+0x5d>
movzbl 0x1(%rbx,%rcx,1),%edx
add    $0x1,%rcx
test   %dl,%dl
jne    1150 <r_index+0x40>
jmp    116f <r_index+0x5f>
mov    $0xffffffff,%eax
jmp    116f <r_index+0x5f>
mov    %ecx,%eax
add    $0x8,%rsp
pop    %rbx
pop    %rbp
ret

LLVM IR (-O0):
define i32 @r_index(i8* %0, i32 %1, i32 %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %5
store i32 %1, i32* %6
store i32 %2, i32* %7
store i32 0, i32* %8
%9 = load i32, i32* %7
%10 = icmp ne i32 %9, 0
br i1 %10, label %11, label %35
11: ; preds = %3
%12 = load i8*, i8** %5
%13 = call i64 @strlen(i8* %12)
%14 = sub i64 %13, 1
%15 = trunc i64 %14 to i32
store i32 %15, i32* %8
br label %16
16: ; preds = %31, %11
%17 = load i32, i32* %8
%18 = icmp sge i32 %17, 0
br i1 %18, label %19, label %34
19: ; preds = %16
%20 = load i8*, i8** %5
%21 = load i32, i32* %8
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i8, i8* %20, i64 %22
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = load i32, i32* %6
%27 = icmp eq i32 %25, %26
br i1 %27, label %28, label %30
28: ; preds = %19
%29 = load i32, i32* %8
store i32 %29, i32* %4
br label %60
30: ; preds = %19
br label %31
31: ; preds = %30
%32 = load i32, i32* %8
%33 = add nsw i32 %32, -1
store i32 %33, i32* %8
br label %16
34: ; preds = %16
br label %59
35: ; preds = %3
store i32 0, i32* %8
br label %36
36: ; preds = %55, %35
%37 = load i8*, i8** %5
%38 = load i32, i32* %8
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i8, i8* %37, i64 %39
%41 = load i8, i8* %40
%42 = icmp ne i8 %41, 0
br i1 %42, label %43, label %58
43: ; preds = %36
%44 = load i8*, i8** %5
%45 = load i32, i32* %8
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i8, i8* %44, i64 %46
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = load i32, i32* %6
%51 = icmp eq i32 %49, %50
br i1 %51, label %52, label %54
52: ; preds = %43
%53 = load i32, i32* %8
store i32 %53, i32* %4
br label %60
54: ; preds = %43
br label %55
55: ; preds = %54
%56 = load i32, i32* %8
%57 = add nsw i32 %56, 1
store i32 %57, i32* %8
br label %36
58: ; preds = %36
br label %59
59: ; preds = %58, %34
store i32 -1, i32* %4
br label %60
60: ; preds = %59, %52, %28
%61 = load i32, i32* %4
ret i32 %61
}

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