#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 */
int strlen(char *);
int palindrom(char c[1000]) {
  int i = 0, lenght;
  lenght = strlen(c) - 1;
  while (lenght > i) {
    if (c[i] != c[lenght])
      return 0;
    i++;
    lenght--;
  }
  return 1;
}


x86 assembly (clang, -O0):
<palindrom>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x10(%rbp),%rdi
call   1030 <strlen@plt>
sub    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jle    1181 <palindrom+0x71>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    -0x10(%rbp),%rcx
movslq -0x18(%rbp),%rdx
movsbl (%rcx,%rdx,1),%ecx
cmp    %ecx,%eax
je     116a <palindrom+0x5a>
movl   $0x0,-0x4(%rbp)
jmp    1188 <palindrom+0x78>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x18(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x18(%rbp)
jmp    1132 <palindrom+0x22>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<palindrom>:
push   %rbx
mov    %rdi,%rbx
call   1030 <strlen@plt>
mov    %eax,%ecx
mov    $0x1,%eax
cmp    $0x2,%ecx
jl     115f <palindrom+0x4f>
movabs $0x100000000,%r8
mov    %ecx,%ecx
add    $0xffffffffffffffff,%rcx
mov    %r8,%rsi
mov    %rbx,%rdi
nopl   0x0(%rax,%rax,1)
movzbl (%rdi),%edx
cmp    (%rbx,%rcx,1),%dl
jne    1161 <palindrom+0x51>
add    $0xffffffffffffffff,%rcx
mov    %rsi,%rdx
sar    $0x20,%rdx
add    $0x1,%rdi
add    %r8,%rsi
cmp    %rdx,%rcx
jg     1140 <palindrom+0x30>
pop    %rbx
ret
xor    %eax,%eax
pop    %rbx
ret

LLVM IR (-O0):
define i32 @palindrom(i8* %0) {
%2 = alloca i32
%3 = alloca i8*
%4 = alloca i32
%5 = alloca i32
store i8* %0, i8** %3
store i32 0, i32* %4
%6 = load i8*, i8** %3
%7 = call i32 @strlen(i8* %6)
%8 = sub nsw i32 %7, 1
store i32 %8, i32* %5
br label %9
9: ; preds = %28, %1
%10 = load i32, i32* %5
%11 = load i32, i32* %4
%12 = icmp sgt i32 %10, %11
br i1 %12, label %13, label %33
13: ; preds = %9
%14 = load i8*, i8** %3
%15 = load i32, i32* %4
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i8, i8* %14, i64 %16
%18 = load i8, i8* %17
%19 = sext i8 %18 to i32
%20 = load i8*, i8** %3
%21 = load i32, i32* %5
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i8, i8* %20, i64 %22
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = icmp ne i32 %19, %25
br i1 %26, label %27, label %28
27: ; preds = %13
store i32 0, i32* %2
br label %34
28: ; preds = %13
%29 = load i32, i32* %4
%30 = add nsw i32 %29, 1
store i32 %30, i32* %4
%31 = load i32, i32* %5
%32 = add nsw i32 %31, -1
store i32 %32, i32* %5
br label %9
33: ; preds = %9
store i32 1, i32* %2
br label %34
34: ; preds = %33, %27
%35 = load i32, i32* %2
ret i32 %35
}

LLVM IR (-O2):
define i32 @palindrom(i8* %0) {
%2 = tail call i32 @strlen(i8* %0)
%3 = icmp sgt i32 %2, 1
br i1 %3, label %4, label %21
4: ; preds = %1
%5 = zext i32 %2 to i64
%6 = add nsw i64 %5, -1
br label %12
7: ; preds = %12
%8 = add nsw i64 %14, -1
%9 = shl i64 %20, 32
%10 = ashr exact i64 %9, 32
%11 = icmp sgt i64 %8, %10
br i1 %11, label %12, label %21
12: ; preds = %4, %7
%13 = phi i64 [ 0, %4 ], [ %20, %7 ]
%14 = phi i64 [ %6, %4 ], [ %8, %7 ]
%15 = getelementptr inbounds i8, i8* %0, i64 %13
%16 = load i8, i8* %15
%17 = getelementptr inbounds i8, i8* %0, i64 %14
%18 = load i8, i8* %17
%19 = icmp eq i8 %16, %18
%20 = add nuw i64 %13, 1
br i1 %19, label %7, label %21
21: ; preds = %12, %7, %1
%22 = phi i32 [ 1, %1 ], [ 1, %7 ], [ 0, %12 ]
ret i32 %22
}