int xdl_clean_mmatch(char const *dis, long i, long s, long e) {
  long r, rdis0, rpdis0, rdis1, rpdis1;
  if (i - s > 100)
    s = i - 100;
  if (e - i > 100)
    e = i + 100;
  for (r = 1, rdis0 = 0, rpdis0 = 1; (i - r) >= s; r++) {
    if (!dis[i - r])
      rdis0++;
    else if (dis[i - r] == 2)
      rpdis0++;
    else
      break;
  }
  if (rdis0 == 0)
    return 0;
  for (r = 1, rdis1 = 0, rpdis1 = 1; (i + r) <= e; r++) {
    if (!dis[i + r])
      rdis1++;
    else if (dis[i + r] == 2)
      rpdis1++;
    else
      break;
  }
  if (rdis1 == 0)
    return 0;
  rdis1 += rdis0;
  rpdis1 += rpdis0;
  return rpdis1 * 4 < (rpdis1 + rdis1);
}


x86 assembly (clang, -O0):
<xdl_clean_mmatch>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
mov    -0x18(%rbp),%rax
sub    -0x20(%rbp),%rax
cmp    $0x64,%rax
jle    1132 <xdl_clean_mmatch+0x32>
mov    -0x18(%rbp),%rax
sub    $0x64,%rax
mov    %rax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
sub    -0x18(%rbp),%rax
cmp    $0x64,%rax
jle    1150 <xdl_clean_mmatch+0x50>
mov    -0x18(%rbp),%rax
add    $0x64,%rax
mov    %rax,-0x28(%rbp)
movq   $0x1,-0x30(%rbp)
movq   $0x0,-0x38(%rbp)
movq   $0x1,-0x40(%rbp)
mov    -0x18(%rbp),%rax
sub    -0x30(%rbp),%rax
cmp    -0x20(%rbp),%rax
jl     11eb <xdl_clean_mmatch+0xeb>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
sub    -0x30(%rbp),%rcx
cmpb   $0x0,(%rax,%rcx,1)
jne    11a1 <xdl_clean_mmatch+0xa1>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11d5 <xdl_clean_mmatch+0xd5>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
sub    -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x2,%eax
jne    11cb <xdl_clean_mmatch+0xcb>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    11d0 <xdl_clean_mmatch+0xd0>
jmp    11eb <xdl_clean_mmatch+0xeb>
jmp    11d5 <xdl_clean_mmatch+0xd5>
jmp    11da <xdl_clean_mmatch+0xda>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1168 <xdl_clean_mmatch+0x68>
cmpq   $0x0,-0x38(%rbp)
jne    1202 <xdl_clean_mmatch+0x102>
movl   $0x0,-0x4(%rbp)
jmp    12ea <xdl_clean_mmatch+0x1ea>
movq   $0x1,-0x30(%rbp)
movq   $0x0,-0x48(%rbp)
movq   $0x1,-0x50(%rbp)
mov    -0x18(%rbp),%rax
add    -0x30(%rbp),%rax
cmp    -0x28(%rbp),%rax
jg     129d <xdl_clean_mmatch+0x19d>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
add    -0x30(%rbp),%rcx
cmpb   $0x0,(%rax,%rcx,1)
jne    1253 <xdl_clean_mmatch+0x153>
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    1287 <xdl_clean_mmatch+0x187>
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
add    -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x2,%eax
jne    127d <xdl_clean_mmatch+0x17d>
mov    -0x50(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x50(%rbp)
jmp    1282 <xdl_clean_mmatch+0x182>
jmp    129d <xdl_clean_mmatch+0x19d>
jmp    1287 <xdl_clean_mmatch+0x187>
jmp    128c <xdl_clean_mmatch+0x18c>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    121a <xdl_clean_mmatch+0x11a>
cmpq   $0x0,-0x48(%rbp)
jne    12b4 <xdl_clean_mmatch+0x1b4>
movl   $0x0,-0x4(%rbp)
jmp    12ea <xdl_clean_mmatch+0x1ea>
mov    -0x38(%rbp),%rax
add    -0x48(%rbp),%rax
mov    %rax,-0x48(%rbp)
mov    -0x40(%rbp),%rax
add    -0x50(%rbp),%rax
mov    %rax,-0x50(%rbp)
mov    -0x50(%rbp),%rax
shl    $0x2,%rax
mov    -0x50(%rbp),%rcx
add    -0x48(%rbp),%rcx
cmp    %rcx,%rax
setl   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<xdl_clean_mmatch>:
mov    %rsi,%rax
sub    %rdx,%rax
lea    -0x64(%rsi),%r9
cmp    $0x65,%rax
cmovl  %rdx,%r9
mov    %rcx,%rax
sub    %rsi,%rax
lea    0x64(%rsi),%r8
cmp    $0x65,%rax
cmovl  %rcx,%r8
xor    %eax,%eax
cmp    %rsi,%r9
jge    11b9 <xdl_clean_mmatch+0xb9>
lea    -0x1(%rsi),%rax
mov    $0x1,%r11d
xor    %edx,%edx
jmp    114d <xdl_clean_mmatch+0x4d>
nopl   (%rax)
add    $0x1,%r11
add    $0xffffffffffffffff,%rax
cmp    %r9,%rax
jl     1160 <xdl_clean_mmatch+0x60>
movzbl (%rdi,%rax,1),%ecx
cmp    $0x2,%cl
je     1140 <xdl_clean_mmatch+0x40>
test   %cl,%cl
jne    1160 <xdl_clean_mmatch+0x60>
add    $0x1,%rdx
jmp    1144 <xdl_clean_mmatch+0x44>
xor    %eax,%eax
test   %rdx,%rdx
je     11b9 <xdl_clean_mmatch+0xb9>
cmp    %rsi,%r8
jle    11b9 <xdl_clean_mmatch+0xb9>
add    $0x1,%rsi
mov    $0x1,%r9d
xor    %r10d,%r10d
jmp    118d <xdl_clean_mmatch+0x8d>
nopl   0x0(%rax,%rax,1)
add    $0x1,%r9
add    $0x1,%rsi
cmp    %r8,%rsi
jg     119f <xdl_clean_mmatch+0x9f>
movzbl (%rdi,%rsi,1),%eax
cmp    $0x2,%al
je     1180 <xdl_clean_mmatch+0x80>
test   %al,%al
jne    119f <xdl_clean_mmatch+0x9f>
add    $0x1,%r10
jmp    1184 <xdl_clean_mmatch+0x84>
test   %r10,%r10
je     11ba <xdl_clean_mmatch+0xba>
add    %rdx,%r10
add    %r11,%r9
add    %r9,%r10
shl    $0x2,%r9
xor    %eax,%eax
cmp    %r10,%r9
setl   %al
ret
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i32 @xdl_clean_mmatch(i8* nocapture %0, i64 %1, i64 %2, i64 %3) {
%5 = sub nsw i64 %1, %2
%6 = icmp sgt i64 %5, 100
%7 = add nsw i64 %1, -100
%8 = select i1 %6, i64 %7, i64 %2
%9 = sub nsw i64 %3, %1
%10 = icmp sgt i64 %9, 100
%11 = add nsw i64 %1, 100
%12 = select i1 %10, i64 %11, i64 %3
%13 = icmp slt i64 %8, %1
br i1 %13, label %14, label %69
14: ; preds = %4
%15 = add nsw i64 %1, -1
br label %16
16: ; preds = %14, %27
%17 = phi i64 [ %31, %27 ], [ %15, %14 ]
%18 = phi i64 [ %29, %27 ], [ 1, %14 ]
%19 = phi i64 [ %28, %27 ], [ 0, %14 ]
%20 = phi i64 [ %30, %27 ], [ 1, %14 ]
%21 = getelementptr inbounds i8, i8* %0, i64 %17
%22 = load i8, i8* %21
switch i8 %22, label %33 [
i8 0, label %23
i8 2, label %25
]
23: ; preds = %16
%24 = add nsw i64 %19, 1
br label %27
25: ; preds = %16
%26 = add nsw i64 %18, 1
br label %27
27: ; preds = %23, %25
%28 = phi i64 [ %19, %25 ], [ %24, %23 ]
%29 = phi i64 [ %26, %25 ], [ %18, %23 ]
%30 = add nuw nsw i64 %20, 1
%31 = sub nsw i64 %1, %30
%32 = icmp slt i64 %31, %8
br i1 %32, label %33, label %16
33: ; preds = %27, %16
%34 = phi i64 [ %28, %27 ], [ %19, %16 ]
%35 = phi i64 [ %29, %27 ], [ %18, %16 ]
%36 = icmp ne i64 %34, 0
%37 = icmp sgt i64 %12, %1
%38 = select i1 %36, i1 %37, i1 false
br i1 %38, label %39, label %69
39: ; preds = %33
%40 = add nsw i64 %1, 1
br label %41
41: ; preds = %39, %52
%42 = phi i64 [ %56, %52 ], [ %40, %39 ]
%43 = phi i64 [ %54, %52 ], [ 1, %39 ]
%44 = phi i64 [ %53, %52 ], [ 0, %39 ]
%45 = phi i64 [ %55, %52 ], [ 1, %39 ]
%46 = getelementptr inbounds i8, i8* %0, i64 %42
%47 = load i8, i8* %46
switch i8 %47, label %58 [
i8 0, label %48
i8 2, label %50
]
48: ; preds = %41
%49 = add nsw i64 %44, 1
br label %52
50: ; preds = %41
%51 = add nsw i64 %43, 1
br label %52
52: ; preds = %48, %50
%53 = phi i64 [ %44, %50 ], [ %49, %48 ]
%54 = phi i64 [ %51, %50 ], [ %43, %48 ]
%55 = add nuw nsw i64 %45, 1
%56 = add nsw i64 %55, %1
%57 = icmp sgt i64 %56, %12
br i1 %57, label %58, label %41
58: ; preds = %52, %41
%59 = phi i64 [ %53, %52 ], [ %44, %41 ]
%60 = phi i64 [ %54, %52 ], [ %43, %41 ]
%61 = icmp eq i64 %59, 0
br i1 %61, label %69, label %62
62: ; preds = %58
%63 = add nsw i64 %59, %34
%64 = add nsw i64 %60, %35
%65 = shl nsw i64 %64, 2
%66 = add nsw i64 %63, %64
%67 = icmp slt i64 %65, %66
%68 = zext i1 %67 to i32
br label %69
69: ; preds = %4, %58, %33, %62
%70 = phi i32 [ %68, %62 ], [ 0, %33 ], [ 0, %58 ], [ 0, %4 ]
ret i32 %70
}