#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
char const CHAR_MIN;
int has_common_substring_pa(const unsigned long long *parray, const char *s2,
                            size_t s2len) {
  unsigned long long D;
  size_t r = 7 - 1;
  size_t l;
  const char *ch;
  while (r < s2len) {
    l = r - (7 - 1);
    ch = &s2[s2len - 1 - r];
    D = parray[*ch - CHAR_MIN];
    while (D) {
      r--;
      D = (D << 1) & parray[*++ch - CHAR_MIN];
      if (r == l && D)
        return 1;
    }
    r += 7;
  }
  return 0;
}


x86 assembly (clang, -O0):
<has_common_substring_pa>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
movq   $0x6,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x20(%rbp),%rax
jae    11f3 <has_common_substring_pa+0xf3>
mov    -0x30(%rbp),%rax
sub    $0x6,%rax
mov    %rax,-0x38(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%rcx
sub    $0x1,%rcx
sub    -0x30(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsbl (%rcx),%ecx
mov    0x2e8d(%rip),%rdx
movsbl (%rdx),%edx
sub    %edx,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
je     11e2 <has_common_substring_pa+0xe2>
mov    -0x30(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
shl    $0x1,%rax
mov    -0x10(%rbp),%rcx
mov    -0x40(%rbp),%rdx
mov    %rdx,%rsi
add    $0x1,%rsi
mov    %rsi,-0x40(%rbp)
movsbl 0x1(%rdx),%edx
mov    0x2e40(%rip),%rsi
movsbl (%rsi),%esi
sub    %esi,%edx
movslq %edx,%rdx
and    (%rcx,%rdx,8),%rax
mov    %rax,-0x28(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x38(%rbp),%rax
jne    11dd <has_common_substring_pa+0xdd>
cmpq   $0x0,-0x28(%rbp)
je     11dd <has_common_substring_pa+0xdd>
movl   $0x1,-0x4(%rbp)
jmp    11fa <has_common_substring_pa+0xfa>
jmp    116b <has_common_substring_pa+0x6b>
mov    -0x30(%rbp),%rax
add    $0x7,%rax
mov    %rax,-0x30(%rbp)
jmp    1118 <has_common_substring_pa+0x18>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<has_common_substring_pa>:
push   %rbx
xor    %eax,%eax
cmp    $0x7,%rdx
jb     116e <has_common_substring_pa+0x6e>
lea    (%rsi,%rdx,1),%r8
mov    $0x6,%r9d
mov    %r9,%rax
not    %rax
add    %rdx,%rax
movsbq (%rsi,%rax,1),%rax
mov    (%rdi,%rax,8),%rbx
mov    %r8,%r10
sub    %r9,%r10
xor    %ecx,%ecx
nopl   (%rax)
test   %rbx,%rbx
je     1160 <has_common_substring_pa+0x60>
add    %rbx,%rbx
movsbq (%r10,%rcx,1),%rax
and    (%rdi,%rax,8),%rbx
lea    0x1(%rcx),%r11
cmp    $0x5,%rcx
mov    %r11,%rcx
jne    1130 <has_common_substring_pa+0x30>
mov    %r11,%rcx
test   %rbx,%rbx
je     1130 <has_common_substring_pa+0x30>
jmp    1170 <has_common_substring_pa+0x70>
nopl   0x0(%rax,%rax,1)
sub    %rcx,%r9
add    $0x7,%r9
xor    %eax,%eax
cmp    %rdx,%r9
jb     1113 <has_common_substring_pa+0x13>
pop    %rbx
ret
mov    $0x1,%eax
pop    %rbx
ret

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

LLVM IR (-O2):
@CHAR_MIN = constant i8 0
define i32 @has_common_substring_pa(i64* nocapture %0, i8* nocapture %1, i64 %2) {
%4 = icmp ugt i64 %2, 6
br i1 %4, label %5, label %35
5: ; preds = %3, %32
%6 = phi i64 [ %33, %32 ], [ 6, %3 ]
%7 = xor i64 %6, -1
%8 = add i64 %7, %2
%9 = getelementptr inbounds i8, i8* %1, i64 %8
%10 = load i8, i8* %9
%11 = sext i8 %10 to i64
%12 = getelementptr inbounds i64, i64* %0, i64 %11
%13 = load i64, i64* %12
%14 = add i64 %6, -5
br label %15
15: ; preds = %20, %5
%16 = phi i64 [ %13, %5 ], [ %28, %20 ]
%17 = phi i64 [ %6, %5 ], [ %21, %20 ]
%18 = phi i8* [ %9, %5 ], [ %23, %20 ]
%19 = icmp eq i64 %16, 0
br i1 %19, label %32, label %20
20: ; preds = %15
%21 = add i64 %17, -1
%22 = shl i64 %16, 1
%23 = getelementptr inbounds i8, i8* %18, i64 1
%24 = load i8, i8* %23
%25 = sext i8 %24 to i64
%26 = getelementptr inbounds i64, i64* %0, i64 %25
%27 = load i64, i64* %26
%28 = and i64 %27, %22
%29 = icmp eq i64 %17, %14
%30 = icmp ne i64 %28, 0
%31 = select i1 %29, i1 %30, i1 false
br i1 %31, label %35, label %15
32: ; preds = %15
%33 = add i64 %17, 7
%34 = icmp ult i64 %33, %2
br i1 %34, label %5, label %35
35: ; preds = %32, %20, %3
%36 = phi i32 [ 0, %3 ], [ 1, %20 ], [ 0, %32 ]
ret i32 %36
}