int agrep_score(correct_string, unknown_string)
char *correct_string, *unknown_string;
{
  int score;
  char c1, c2, *p1, *p2;
  if (strcmp(correct_string, unknown_string) == 0)
    return 10000;
  score = 0;
  p1 = correct_string;
  p2 = unknown_string;
  while (1) {
    if ((c1 = *p1++) == '\0') {
      score -= strlen(p2);
      break;
    }
    if ((c2 = *p2++) == '\0') {
      score -= strlen(p1);
      break;
    }
    if (c1 == c2)
      ++score;
    else if (c1 == *p2 && c2 == *p1) {
      score += 2;
      ++p1;
      ++p2;
    } else if (c1 == *p2) {
      ++score;
      ++p2;
    } else if (c2 == *p1) {
      ++score;
      ++p1;
    }
  }
  return score;
}


x86 assembly (clang, -O0):
<agrep_score>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
call   1040 <strcmp@plt>
cmp    $0x0,%eax
jne    1152 <agrep_score+0x32>
movl   $0x2710,-0x4(%rbp)
jmp    12b8 <agrep_score+0x198>
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x28(%rbp)
mov    (%rax),%al
mov    %al,-0x1d(%rbp)
movsbl %al,%eax
cmp    $0x0,%eax
jne    11a4 <agrep_score+0x84>
mov    -0x30(%rbp),%rdi
call   1030 <strlen@plt>
mov    %rax,%rcx
movslq -0x1c(%rbp),%rax
sub    %rcx,%rax
mov    %eax,-0x1c(%rbp)
jmp    12b2 <agrep_score+0x192>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x30(%rbp)
mov    (%rax),%al
mov    %al,-0x1e(%rbp)
movsbl %al,%eax
cmp    $0x0,%eax
jne    11df <agrep_score+0xbf>
mov    -0x28(%rbp),%rdi
call   1030 <strlen@plt>
mov    %rax,%rcx
movslq -0x1c(%rbp),%rax
sub    %rcx,%rax
mov    %eax,-0x1c(%rbp)
jmp    12b2 <agrep_score+0x192>
movsbl -0x1d(%rbp),%eax
movsbl -0x1e(%rbp),%ecx
cmp    %ecx,%eax
jne    11fd <agrep_score+0xdd>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    12ad <agrep_score+0x18d>
movsbl -0x1d(%rbp),%eax
mov    -0x30(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    1249 <agrep_score+0x129>
movsbl -0x1e(%rbp),%eax
mov    -0x28(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    1249 <agrep_score+0x129>
mov    -0x1c(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    12a8 <agrep_score+0x188>
movsbl -0x1d(%rbp),%eax
mov    -0x30(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    1276 <agrep_score+0x156>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    12a3 <agrep_score+0x183>
movsbl -0x1e(%rbp),%eax
mov    -0x28(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    129e <agrep_score+0x17e>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    12a3 <agrep_score+0x183>
jmp    12a8 <agrep_score+0x188>
jmp    12ad <agrep_score+0x18d>
jmp    1169 <agrep_score+0x49>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<agrep_score>:
push   %rbp
push   %r14
push   %rbx
mov    %rsi,%rbx
mov    %rdi,%rbp
call   1040 <strcmp@plt>
test   %eax,%eax
je     11cb <agrep_score+0xab>
mov    0x0(%rbp),%al
xor    %r14d,%r14d
test   %al,%al
je     11be <agrep_score+0x9e>
mov    %rbx,%rcx
jmp    1161 <agrep_score+0x41>
nopw   0x0(%rax,%rax,1)
add    $0x1,%r14d
movzbl (%rdi),%eax
mov    %rbx,%rcx
mov    %rdi,%rbp
test   %al,%al
je     11be <agrep_score+0x9e>
lea    0x1(%rbp),%rdi
movzbl (%rcx),%edx
test   %dl,%dl
je     11c1 <agrep_score+0xa1>
lea    0x1(%rcx),%rbx
cmp    %dl,%al
je     1150 <agrep_score+0x30>
cmp    (%rbx),%al
movzbl (%rdi),%eax
jne    11a0 <agrep_score+0x80>
cmp    %al,%dl
jne    11b1 <agrep_score+0x91>
add    $0x2,%r14d
add    $0x2,%rbp
add    $0x2,%rcx
mov    %rbp,%rdi
mov    %rcx,%rbx
jmp    1154 <agrep_score+0x34>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
cmp    %al,%dl
jne    1157 <agrep_score+0x37>
add    $0x1,%r14d
add    $0x2,%rbp
mov    %rbp,%rdi
jmp    1154 <agrep_score+0x34>
add    $0x1,%r14d
add    $0x2,%rcx
mov    %rcx,%rbx
jmp    1157 <agrep_score+0x37>
mov    %rbx,%rdi
call   1030 <strlen@plt>
sub    %eax,%r14d
jmp    11d1 <agrep_score+0xb1>
mov    $0x2710,%r14d
mov    %r14d,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret

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

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