int sindex(source, pattern)
char *source;
char *pattern;
{
  char *sp;
  char *csp;
  char *cp;
  sp = source;
  while (*sp) {
    cp = pattern;
    csp = sp;
    while (*cp) {
      if (!eq(*cp, *csp))
        break;
      ++cp;
      ++csp;
    }
    if (*cp == 0)
      return ((int)(sp - source) + 1);
    ++sp;
  }
  return (0);
}


x86 assembly (clang, -O0):
<sindex>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     11c9 <sindex+0xb9>
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x30(%rbp),%rax
cmpb   $0x0,(%rax)
je     1192 <sindex+0x82>
mov    -0x30(%rbp),%rax
movsbl (%rax),%edi
mov    -0x28(%rbp),%rax
movsbl (%rax),%esi
mov    $0x0,%al
call   1030 <eq@plt>
cmp    $0x0,%eax
jne    1175 <sindex+0x65>
jmp    1192 <sindex+0x82>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1145 <sindex+0x35>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    11b8 <sindex+0xa8>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
sub    %rcx,%rax
add    $0x1,%eax
mov    %eax,-0x4(%rbp)
jmp    11d0 <sindex+0xc0>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1128 <sindex+0x18>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sindex>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    (%rdi),%al
test   %al,%al
je     1184 <sindex+0x74>
mov    %rsi,%r15
mov    %rdi,%r14
mov    %rdi,%r12
movsbl (%r15),%edi
test   %edi,%edi
je     1189 <sindex+0x79>
movsbl %al,%esi
xor    %eax,%eax
call   1030 <eq@plt>
mov    %r15,%rbx
test   %eax,%eax
je     1172 <sindex+0x62>
xor    %ebx,%ebx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsbl 0x1(%r15,%rbx,1),%edi
test   %edi,%edi
je     1189 <sindex+0x79>
movsbl 0x1(%r12,%rbx,1),%esi
xor    %eax,%eax
call   1030 <eq@plt>
add    $0x1,%rbx
test   %eax,%eax
jne    1150 <sindex+0x40>
add    %r15,%rbx
cmpb   $0x0,(%rbx)
je     1189 <sindex+0x79>
mov    0x1(%r12),%al
add    $0x1,%r12
test   %al,%al
jne    1127 <sindex+0x17>
xor    %r12d,%r12d
jmp    1190 <sindex+0x80>
sub    %r14d,%r12d
add    $0x1,%r12d
mov    %r12d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

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