char *find_percent(pattern)
char *pattern;
{
  unsigned int pattern_len = strlen(pattern);
  register char *p = pattern;
  while ((p = index(p, '%')) != 0)
    if (p > pattern && p[-1] == '\\') {
      register int i = -2;
      register unsigned int len;
      while (&p[i] >= pattern && p[i] == '\\')
        --i;
      ++i;
      len = pattern_len - (p - pattern);
      bcopy(&p[i / 2], &p[i], len - (i / 2));
      p -= i / 2;
      p[len - 1] = '\0';
      if (i % 2 == 0)
        return p;
      else
        ++p;
    } else
      return p;
  return 0;
}


x86 assembly (clang, -O0):
<find_percent>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rdi
mov    $0x25,%esi
call   1040 <index@plt>
mov    %rax,-0x20(%rbp)
cmp    $0x0,%rax
je     12ac <find_percent+0x17c>
mov    -0x20(%rbp),%rax
cmp    -0x10(%rbp),%rax
jbe    129a <find_percent+0x16a>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x5c,%eax
jne    129a <find_percent+0x16a>
movl   $0xfffffffe,-0x24(%rbp)
mov    -0x20(%rbp),%rcx
movslq -0x24(%rbp),%rax
add    %rax,%rcx
xor    %eax,%eax
cmp    -0x10(%rbp),%rcx
mov    %al,-0x29(%rbp)
jb     11c1 <find_percent+0x91>
mov    -0x20(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x5c,%eax
sete   %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    11d1 <find_percent+0xa1>
jmp    11df <find_percent+0xaf>
mov    -0x24(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x24(%rbp)
jmp    1192 <find_percent+0x62>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x14(%rbp),%eax
mov    -0x20(%rbp),%rcx
mov    -0x10(%rbp),%rdx
sub    %rdx,%rcx
sub    %rcx,%rax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%rdi
mov    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cltq
add    %rax,%rdi
mov    -0x20(%rbp),%rsi
movslq -0x24(%rbp),%rax
add    %rax,%rsi
mov    -0x28(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    -0x30(%rbp),%edx
sub    %eax,%edx
mov    $0x0,%al
call   1050 <bcopy@plt>
mov    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
movslq %ecx,%rdx
xor    %ecx,%ecx
sub    %rdx,%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
mov    %ecx,%ecx
movb   $0x0,(%rax,%rcx,1)
mov    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    1289 <find_percent+0x159>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    12b4 <find_percent+0x184>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    12a7 <find_percent+0x177>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    12b4 <find_percent+0x184>
jmp    1150 <find_percent+0x20>
movq   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<find_percent>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rdi,%r15
call   1030 <strlen@plt>
mov    %rax,%r14
mov    %r15,%rdi
jmp    119d <find_percent+0x6d>
nopl   0x0(%rax,%rax,1)
lea    0x1(%rax),%r12d
mov    %r15d,%r13d
sub    %ebx,%r13d
lea    (%r14,%r13,1),%edx
mov    %r12d,%ecx
shr    $0x1f,%ecx
add    %eax,%ecx
add    $0x1,%ecx
sar    %ecx
movslq %ecx,%rbp
lea    (%rbx,%rbp,1),%rdi
cltq
lea    (%rax,%rbx,1),%rsi
add    $0x1,%rsi
sub    %ebp,%edx
xor    %eax,%eax
call   1050 <bcopy@plt>
sub    %rbp,%rbx
lea    (%r14,%r13,1),%eax
add    $0xffffffff,%eax
movb   $0x0,(%rbx,%rax,1)
lea    0x1(%rbx),%rdi
test   $0x1,%r12b
je     11f2 <find_percent+0xc2>
mov    $0x25,%esi
call   1040 <index@plt>
test   %rax,%rax
je     11f0 <find_percent+0xc0>
mov    %rax,%rbx
cmp    %r15,%rax
jbe    11f2 <find_percent+0xc2>
cmpb   $0x5c,-0x1(%rbx)
jne    11f2 <find_percent+0xc2>
lea    -0x2(%rbx),%rcx
mov    $0xfffffffe,%eax
cmp    %r15,%rcx
jb     1150 <find_percent+0x20>
mov    $0xfffffffffffffffe,%rax
nop
cmpb   $0x5c,(%rbx,%rax,1)
jne    1150 <find_percent+0x20>
lea    (%rbx,%rax,1),%rcx
add    $0xffffffffffffffff,%rcx
add    $0xffffffffffffffff,%rax
cmp    %r15,%rcx
jae    11d0 <find_percent+0xa0>
jmp    1150 <find_percent+0x20>
xor    %ebx,%ebx
mov    %rbx,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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