#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 getchar();
int /*<<< orphan*/ printf(char *);
int /*<<< orphan*/ putchar(char);
int main() {
  int count, tag, countback, flag, loop = 1;
  char letter[80];
  while (loop) {
    flag = 1;
    printf("\nPROGRAM TO CHECK FOR A PALINDROME\n");
    printf("\nPlease enter a word,pharse or sentence below\n");
    for (count = 0; (letter[count] = getchar()) != '\n'; ++count)
      if ((letter[0] == 'E' || letter[0] == 'e') &&
          (letter[1] == 'N' || letter[1] == 'n') &&
          (letter[2] == 'D' || letter[2] == 'd')) {
        loop = 0;
        break;
      }
    tag = count - 1;
    for ((count = 0, countback = tag); count <= tag / 2;
         (++count, --countback)) {
      if (letter[count] != letter[countback]) {
        flag = 0;
        break;
      }
    }
    for (count = 0; count <= tag; ++count)
      putchar(letter[count]);
    if (flag)
      printf(" IS A PALINDROME");
    else
      printf(" IS NOT A PALINDROME");
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x1,-0x18(%rbp)
cmpl   $0x0,-0x18(%rbp)
je     12d2 <main+0x1a2>
movl   $0x1,-0x14(%rbp)
lea    0xe9f(%rip),%rdi
call   1040 <printf@plt>
lea    0xeb7(%rip),%rdi
call   1040 <printf@plt>
movl   $0x0,-0x8(%rbp)
mov    $0x0,%al
call   1050 <getchar@plt>
movslq -0x8(%rbp),%rcx
mov    %al,-0x70(%rbp,%rcx,1)
movsbl %al,%eax
cmp    $0xa,%eax
je     1201 <main+0xd1>
movsbl -0x70(%rbp),%eax
cmp    $0x45,%eax
je     11ae <main+0x7e>
movsbl -0x70(%rbp),%eax
cmp    $0x65,%eax
jne    11ee <main+0xbe>
movsbl -0x6f(%rbp),%eax
cmp    $0x4e,%eax
je     11c8 <main+0x98>
movsbl -0x6f(%rbp),%eax
cmp    $0x6e,%eax
jne    11ee <main+0xbe>
movsbl -0x6e(%rbp),%eax
cmp    $0x44,%eax
je     11e2 <main+0xb2>
movsbl -0x6e(%rbp),%eax
cmp    $0x64,%eax
jne    11ee <main+0xbe>
movl   $0x0,-0x18(%rbp)
jmp    1201 <main+0xd1>
jmp    11f3 <main+0xc3>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    1179 <main+0x49>
mov    -0x8(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0xc(%rbp)
movl   $0x0,-0x8(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%eax
mov    %eax,-0x74(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x74(%rbp),%eax
cmp    %ecx,%eax
jg     1277 <main+0x147>
movslq -0x8(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
movslq -0x10(%rbp),%rcx
movsbl -0x70(%rbp,%rcx,1),%ecx
cmp    %ecx,%eax
je     125b <main+0x12b>
movl   $0x0,-0x14(%rbp)
jmp    1277 <main+0x147>
jmp    1260 <main+0x130>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
mov    -0x10(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x10(%rbp)
jmp    1217 <main+0xe7>
movl   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     12a6 <main+0x176>
movslq -0x8(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%edi
call   1030 <putchar@plt>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    127e <main+0x14e>
cmpl   $0x0,-0x14(%rbp)
je     12c1 <main+0x191>
lea    0xd9c(%rip),%rdi
call   1040 <printf@plt>
jmp    12cd <main+0x19d>
lea    0xd9c(%rip),%rdi
call   1040 <printf@plt>
jmp    1149 <main+0x19>
xor    %eax,%eax
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
lea    0xebc(%rip),%r13
jmp    117f <main+0x3f>
nopw   0x0(%rax,%rax,1)
test   %r14b,%r14b
mov    %r13,%rdi
lea    0xe93(%rip),%rax
cmovne %rax,%rdi
call   1050 <printf@plt>
test   %r12b,%r12b
jne    12b4 <main+0x174>
lea    0xea0(%rip),%rdi
call   1040 <puts@plt>
lea    0xeb7(%rip),%rdi
call   1040 <puts@plt>
xor    %eax,%eax
call   1060 <getchar@plt>
mov    %al,(%rsp)
mov    $0x0,%r15d
mov    $0x0,%r12d
cmp    $0xa,%al
jne    1260 <main+0x120>
lea    -0x1(%r15),%ecx
movslq %ecx,%rax
shr    $0x1f,%ecx
lea    (%r15,%rcx,1),%edx
add    $0xffffffff,%edx
sar    %edx
xor    %r14d,%r14d
test   %edx,%edx
mov    $0x0,%ecx
cmovg  %edx,%ecx
mov    (%rsp),%bl
cmp    (%rsp,%rax,1),%bl
jne    1223 <main+0xe3>
movslq %edx,%rdx
add    $0x1,%ecx
lea    -0x1(%rsp),%rsi
add    %rsi,%rax
add    $0xffffffffffffffff,%rcx
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %rdi,%rsi
cmp    %rdi,%rcx
je     121c <main+0xdc>
movzbl 0x1(%rsp,%rsi,1),%ebx
lea    -0x1(%rax),%rbp
lea    0x1(%rsi),%rdi
cmp    (%rax),%bl
mov    %rbp,%rax
je     1200 <main+0xc0>
cmp    %rdx,%rsi
setge  %r14b
test   %r15d,%r15d
je     1160 <main+0x20>
mov    %r15d,%ebp
xor    %ebx,%ebx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsbl (%rsp,%rbx,1),%edi
call   1030 <putchar@plt>
add    $0x1,%rbx
cmp    %rbx,%rbp
jne    1240 <main+0x100>
jmp    1160 <main+0x20>
nopw   0x0(%rax,%rax,1)
mov    %eax,%ebx
and    $0xdf,%bl
xor    %r14d,%r14d
jmp    128e <main+0x14e>
nopw   0x0(%rax,%rax,1)
lea    0x1(%r14),%r15
xor    %r12d,%r12d
xor    %eax,%eax
call   1060 <getchar@plt>
mov    %al,0x1(%rsp,%r14,1)
mov    %r15,%r14
cmp    $0xa,%al
je     11b5 <main+0x75>
cmp    $0x45,%bl
jne    1270 <main+0x130>
movzbl 0x1(%rsp),%eax
and    $0xdf,%al
cmp    $0x4e,%al
jne    1270 <main+0x130>
movzbl 0x2(%rsp),%eax
and    $0xdf,%al
cmp    $0x44,%al
jne    1270 <main+0x130>
mov    $0x1,%r12b
mov    %r14,%r15
jmp    11b5 <main+0x75>
xor    %eax,%eax
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [36 x i8] c"\0APROGRAM TO CHECK FOR A PALINDROME\0A\00"
@.str.1 = [47 x i8] c"\0APlease enter a word,pharse or sentence below\0A\00"
@.str.2 = [17 x i8] c" IS A PALINDROME\00"
@.str.3 = [21 x i8] c" IS NOT A PALINDROME\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca [80 x i8]
store i32 0, i32* %1
store i32 1, i32* %6
br label %8
8: ; preds = %105, %0
%9 = load i32, i32* %6
%10 = icmp ne i32 %9, 0
br i1 %10, label %11, label %106
11: ; preds = %8
store i32 1, i32* %5
%12 = call i32 @printf(i8* getelementptr inbounds ([36 x i8], [36 x i8]* @.str, i64 0, i64 0))
%13 = call i32 @printf(i8* getelementptr inbounds ([47 x i8], [47 x i8]* @.str.1, i64 0, i64 0))
store i32 0, i32* %2
br label %14
14: ; preds = %53, %11
%15 = call signext i8 (...) @getchar()
%16 = load i32, i32* %2
%17 = sext i32 %16 to i64
%18 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 %17
store i8 %15, i8* %18
%19 = sext i8 %15 to i32
%20 = icmp ne i32 %19, 10
br i1 %20, label %21, label %56
21: ; preds = %14
%22 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 0
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
%25 = icmp eq i32 %24, 69
br i1 %25, label %31, label %26
26: ; preds = %21
%27 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 0
%28 = load i8, i8* %27
%29 = sext i8 %28 to i32
%30 = icmp eq i32 %29, 101
br i1 %30, label %31, label %52
31: ; preds = %26, %21
%32 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 1
%33 = load i8, i8* %32
%34 = sext i8 %33 to i32
%35 = icmp eq i32 %34, 78
br i1 %35, label %41, label %36
36: ; preds = %31
%37 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 1
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
%40 = icmp eq i32 %39, 110
br i1 %40, label %41, label %52
41: ; preds = %36, %31
%42 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 2
%43 = load i8, i8* %42
%44 = sext i8 %43 to i32
%45 = icmp eq i32 %44, 68
br i1 %45, label %51, label %46
46: ; preds = %41
%47 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 2
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = icmp eq i32 %49, 100
br i1 %50, label %51, label %52
51: ; preds = %46, %41
store i32 0, i32* %6
br label %56
52: ; preds = %46, %36, %26
br label %53
53: ; preds = %52
%54 = load i32, i32* %2
%55 = add nsw i32 %54, 1
store i32 %55, i32* %2
br label %14
56: ; preds = %51, %14
%57 = load i32, i32* %2
%58 = sub nsw i32 %57, 1
store i32 %58, i32* %3
store i32 0, i32* %2
%59 = load i32, i32* %3
store i32 %59, i32* %4
br label %60
60: ; preds = %79, %56
%61 = load i32, i32* %2
%62 = load i32, i32* %3
%63 = sdiv i32 %62, 2
%64 = icmp sle i32 %61, %63
br i1 %64, label %65, label %84
65: ; preds = %60
%66 = load i32, i32* %2
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 %67
%69 = load i8, i8* %68
%70 = sext i8 %69 to i32
%71 = load i32, i32* %4
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 %72
%74 = load i8, i8* %73
%75 = sext i8 %74 to i32
%76 = icmp ne i32 %70, %75
br i1 %76, label %77, label %78
77: ; preds = %65
store i32 0, i32* %5
br label %84
78: ; preds = %65
br label %79
79: ; preds = %78
%80 = load i32, i32* %2
%81 = add nsw i32 %80, 1
store i32 %81, i32* %2
%82 = load i32, i32* %4
%83 = add nsw i32 %82, -1
store i32 %83, i32* %4
br label %60
84: ; preds = %77, %60
store i32 0, i32* %2
br label %85
85: ; preds = %95, %84
%86 = load i32, i32* %2
%87 = load i32, i32* %3
%88 = icmp sle i32 %86, %87
br i1 %88, label %89, label %98
89: ; preds = %85
%90 = load i32, i32* %2
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds [80 x i8], [80 x i8]* %7, i64 0, i64 %91
%93 = load i8, i8* %92
%94 = call i32 @putchar(i8 signext %93)
br label %95
95: ; preds = %89
%96 = load i32, i32* %2
%97 = add nsw i32 %96, 1
store i32 %97, i32* %2
br label %85
98: ; preds = %85
%99 = load i32, i32* %5
%100 = icmp ne i32 %99, 0
br i1 %100, label %101, label %103
101: ; preds = %98
%102 = call i32 @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0))
br label %105
103: ; preds = %98
%104 = call i32 @printf(i8* getelementptr inbounds ([21 x i8], [21 x i8]* @.str.3, i64 0, i64 0))
br label %105
105: ; preds = %103, %101
br label %8
106: ; preds = %8
ret i32 0
}

LLVM IR (-O2):
@.str.2 = [17 x i8] c" IS A PALINDROME\00"
@.str.3 = [21 x i8] c" IS NOT A PALINDROME\00"
@str = [35 x i8] c"\0APROGRAM TO CHECK FOR A PALINDROME\00"
@str.4 = [46 x i8] c"\0APlease enter a word,pharse or sentence below\00"
define i32 @main() {
%1 = alloca [80 x i8]
%2 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 0
%3 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 2
%4 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 1
%5 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 0
br label %6
6: ; preds = %0, %73
%7 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([35 x i8], [35 x i8]* @str, i64 0, i64 0))
%8 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([46 x i8], [46 x i8]* @str.4, i64 0, i64 0))
%9 = tail call signext i8 (...) @getchar()
store i8 %9, i8* %2
%10 = icmp eq i8 %9, 10
br i1 %10, label %33, label %11
11: ; preds = %6
%12 = and i8 %9, -33
%13 = icmp eq i8 %12, 69
br label %14
14: ; preds = %11, %24
%15 = phi i64 [ 0, %11 ], [ %25, %24 ]
br i1 %13, label %16, label %24
16: ; preds = %14
%17 = load i8, i8* %4
%18 = and i8 %17, -33
%19 = icmp eq i8 %18, 78
br i1 %19, label %20, label %24
20: ; preds = %16
%21 = load i8, i8* %3
%22 = and i8 %21, -33
%23 = icmp eq i8 %22, 68
br i1 %23, label %29, label %24
24: ; preds = %14, %16, %20
%25 = add nuw i64 %15, 1
%26 = tail call signext i8 (...) @getchar()
%27 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 %25
store i8 %26, i8* %27
%28 = icmp eq i8 %26, 10
br i1 %28, label %29, label %14
29: ; preds = %20, %24
%30 = phi i64 [ %25, %24 ], [ %15, %20 ]
%31 = phi i1 [ false, %24 ], [ true, %20 ]
%32 = trunc i64 %30 to i32
br label %33
33: ; preds = %6, %29
%34 = phi i32 [ 0, %6 ], [ %32, %29 ]
%35 = phi i1 [ false, %6 ], [ %31, %29 ]
%36 = add i32 %34, -1
%37 = sdiv i32 %36, 2
%38 = sext i32 %36 to i64
%39 = sext i32 %37 to i64
%40 = call i32 @llvm.smax.i32(i32 %37, i32 0)
%41 = add nuw nsw i32 %40, 1
%42 = zext i32 %41 to i64
%43 = load i8, i8* %5
%44 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 %38
%45 = load i8, i8* %44
%46 = icmp eq i8 %43, %45
br i1 %46, label %53, label %61
47: ; preds = %53
%48 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 %56
%49 = load i8, i8* %48
%50 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 %57
%51 = load i8, i8* %50
%52 = icmp eq i8 %49, %51
br i1 %52, label %53, label %59
53: ; preds = %33, %47
%54 = phi i64 [ %57, %47 ], [ %38, %33 ]
%55 = phi i64 [ %56, %47 ], [ 0, %33 ]
%56 = add nuw nsw i64 %55, 1
%57 = add nsw i64 %54, -1
%58 = icmp eq i64 %56, %42
br i1 %58, label %59, label %47
59: ; preds = %53, %47
%60 = icmp sge i64 %55, %39
br label %61
61: ; preds = %59, %33
%62 = phi i1 [ false, %33 ], [ %60, %59 ]
%63 = icmp eq i32 %34, 0
br i1 %63, label %73, label %64
64: ; preds = %61
%65 = zext i32 %34 to i64
br label %66
66: ; preds = %64, %66
%67 = phi i64 [ 0, %64 ], [ %71, %66 ]
%68 = getelementptr inbounds [80 x i8], [80 x i8]* %1, i64 0, i64 %67
%69 = load i8, i8* %68
%70 = tail call i32 @putchar(i8 signext %69)
%71 = add nuw nsw i64 %67, 1
%72 = icmp eq i64 %71, %65
br i1 %72, label %73, label %66
73: ; preds = %66, %61
%74 = select i1 %62, i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0), i8* getelementptr inbounds ([21 x i8], [21 x i8]* @.str.3, i64 0, i64 0)
%75 = tail call i32 @printf(i8* dereferenceable(1) %74)
br i1 %35, label %76, label %6
76: ; preds = %73
ret i32 0
}