#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 */
scalar_t__ Match(char *, char **);
int Word(char *pattern, char **p) {
  if (Match(pattern, p))
    return 1;
  if (*pattern >= 'a' && *pattern <= 'z' && *pattern - **p == 'a' - 'A') {
    (*p)++;
    if (Match(pattern + 1, p))
      return 1;
    (*p)--;
  }
  return 0;
}


x86 assembly (clang, -O0):
<Word>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
call   1030 <Match@plt>
cmp    $0x0,%rax
je     1143 <Word+0x33>
movl   $0x1,-0x4(%rbp)
jmp    11c9 <Word+0xb9>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x61,%eax
jl     11c2 <Word+0xb2>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x7a,%eax
jg     11c2 <Word+0xb2>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
mov    -0x18(%rbp),%rcx
mov    (%rcx),%rcx
movsbl (%rcx),%ecx
sub    %ecx,%eax
cmp    $0x20,%eax
jne    11c2 <Word+0xb2>
mov    -0x18(%rbp),%rax
mov    (%rax),%rcx
add    $0x1,%rcx
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rdi
add    $0x1,%rdi
mov    -0x18(%rbp),%rsi
call   1030 <Match@plt>
cmp    $0x0,%rax
je     11b4 <Word+0xa4>
movl   $0x1,-0x4(%rbp)
jmp    11c9 <Word+0xb9>
mov    -0x18(%rbp),%rax
mov    (%rax),%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,(%rax)
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Word>:
push   %rbp
push   %r14
push   %rbx
mov    %rsi,%rbx
mov    %rdi,%rbp
call   1030 <Match@plt>
mov    $0x1,%r14d
test   %rax,%rax
jne    1165 <Word+0x55>
movzbl 0x0(%rbp),%eax
lea    -0x61(%rax),%ecx
cmp    $0x19,%cl
ja     1162 <Word+0x52>
mov    (%rbx),%rcx
movsbl (%rcx),%edx
sub    %edx,%eax
cmp    $0x20,%eax
jne    1162 <Word+0x52>
add    $0x1,%rcx
mov    %rcx,(%rbx)
add    $0x1,%rbp
mov    %rbp,%rdi
mov    %rbx,%rsi
call   1030 <Match@plt>
test   %rax,%rax
jne    1165 <Word+0x55>
addq   $0xffffffffffffffff,(%rbx)
xor    %r14d,%r14d
mov    %r14d,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @Word(i8* %0, i8** %1) {
%3 = tail call i64 @Match(i8* %0, i8** %1)
%4 = icmp eq i64 %3, 0
br i1 %4, label %5, label %24
5: ; preds = %2
%6 = load i8, i8* %0
%7 = add i8 %6, -97
%8 = icmp ult i8 %7, 26
br i1 %8, label %9, label %24
9: ; preds = %5
%10 = zext i8 %6 to i32
%11 = load i8*, i8** %1
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = sub nsw i32 %10, %13
%15 = icmp eq i32 %14, 32
br i1 %15, label %16, label %24
16: ; preds = %9
%17 = getelementptr inbounds i8, i8* %11, i64 1
store i8* %17, i8** %1
%18 = getelementptr inbounds i8, i8* %0, i64 1
%19 = tail call i64 @Match(i8* %18, i8** %1)
%20 = icmp eq i64 %19, 0
br i1 %20, label %21, label %24
21: ; preds = %16
%22 = load i8*, i8** %1
%23 = getelementptr inbounds i8, i8* %22, i64 -1
store i8* %23, i8** %1
br label %24
24: ; preds = %5, %9, %21, %16, %2
%25 = phi i32 [ 1, %2 ], [ 1, %16 ], [ 0, %21 ], [ 0, %9 ], [ 0, %5 ]
ret i32 %25
}