#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 *);
void delete_char(char *data, int index) {
  int i, n;
  n = strlen(data);
  for (i = index; i <= n; i++)
    data[i - 1] = data[i];
}


x86 assembly (clang, -O0):
<delete_char>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x14(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1166 <delete_char+0x56>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1131 <delete_char+0x21>
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<delete_char>:
push   %rbp
push   %rbx
push   %rax
mov    %esi,%ebp
mov    %rdi,%rbx
call   1030 <strlen@plt>
mov    %eax,%r10d
sub    %ebp,%r10d
jl     1230 <delete_char+0x120>
movslq %ebp,%rbp
cmp    $0x7,%r10d
jae    113a <delete_char+0x2a>
mov    %rbp,%rdx
jmp    121a <delete_char+0x10a>
movabs $0x1ffffffe0,%r11
cmp    $0x1f,%r10d
jae    1151 <delete_char+0x41>
xor    %edi,%edi
jmp    11d8 <delete_char+0xc8>
lea    0x1(%r10),%r8
mov    %r8,%rdi
and    %r11,%rdi
lea    -0x20(%rdi),%rcx
mov    %rcx,%r9
shr    $0x5,%r9
add    $0x1,%r9
test   %rcx,%rcx
je     120a <delete_char+0xfa>
mov    %r9,%rcx
and    $0xfffffffffffffffe,%rcx
lea    (%rbx,%rbp,1),%rsi
xor    %edx,%edx
movups (%rsi,%rdx,1),%xmm0
movups 0x10(%rsi,%rdx,1),%xmm1
movups 0x20(%rsi,%rdx,1),%xmm2
movups 0x30(%rsi,%rdx,1),%xmm3
movups %xmm0,-0x1(%rsi,%rdx,1)
movups %xmm1,0xf(%rsi,%rdx,1)
movups %xmm2,0x1f(%rsi,%rdx,1)
movups %xmm3,0x2f(%rsi,%rdx,1)
add    $0x40,%rdx
add    $0xfffffffffffffffe,%rcx
jne    1180 <delete_char+0x70>
test   $0x1,%r9b
je     11cd <delete_char+0xbd>
add    %rbp,%rdx
movups (%rbx,%rdx,1),%xmm0
movups 0x10(%rbx,%rdx,1),%xmm1
movups %xmm0,-0x1(%rbx,%rdx,1)
movups %xmm1,0xf(%rbx,%rdx,1)
cmp    %rdi,%r8
je     1230 <delete_char+0x120>
test   $0x18,%r8b
je     1214 <delete_char+0x104>
add    $0x1,%r10
add    $0x18,%r11
and    %r10,%r11
lea    (%r11,%rbp,1),%rdx
add    %rbx,%rbp
nopw   0x0(%rax,%rax,1)
mov    0x0(%rbp,%rdi,1),%rcx
mov    %rcx,-0x1(%rbp,%rdi,1)
add    $0x8,%rdi
cmp    %rdi,%r11
jne    11f0 <delete_char+0xe0>
cmp    %r11,%r10
jne    121a <delete_char+0x10a>
jmp    1230 <delete_char+0x120>
xor    %edx,%edx
test   $0x1,%r9b
jne    11b7 <delete_char+0xa7>
jmp    11cd <delete_char+0xbd>
add    %rbp,%rdi
mov    %rdi,%rdx
add    $0x1,%eax
mov    %eax,%eax
nop
movzbl (%rbx,%rdx,1),%ecx
mov    %cl,-0x1(%rbx,%rdx,1)
add    $0x1,%rdx
cmp    %edx,%eax
jne    1220 <delete_char+0x110>
add    $0x8,%rsp
pop    %rbx
pop    %rbp
ret

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

LLVM IR (-O2):
define void @delete_char(i8* %0, i32 %1) {
%3 = tail call i32 @strlen(i8* %0)
%4 = icmp slt i32 %3, %1
br i1 %4, label %107, label %5
5: ; preds = %2
%6 = sext i32 %1 to i64
%7 = add i32 %3, 1
%8 = sub i32 %3, %1
%9 = zext i32 %8 to i64
%10 = add nuw nsw i64 %9, 1
%11 = icmp ult i32 %8, 7
br i1 %11, label %96, label %12
12: ; preds = %5
%13 = icmp ult i32 %8, 31
br i1 %13, label %76, label %14
14: ; preds = %12
%15 = and i64 %10, 8589934560
%16 = add nsw i64 %15, -32
%17 = lshr exact i64 %16, 5
%18 = add nuw nsw i64 %17, 1
%19 = and i64 %18, 1
%20 = icmp eq i64 %16, 0
br i1 %20, label %54, label %21
21: ; preds = %14
%22 = and i64 %18, 1152921504606846974
br label %23
23: ; preds = %23, %21
%24 = phi i64 [ 0, %21 ], [ %51, %23 ]
%25 = phi i64 [ 0, %21 ], [ %52, %23 ]
%26 = add i64 %24, %6
%27 = getelementptr inbounds i8, i8* %0, i64 %26
%28 = bitcast i8* %27 to <16 x i8>*
%29 = load <16 x i8>, <16 x i8>* %28
%30 = getelementptr inbounds i8, i8* %27, i64 16
%31 = bitcast i8* %30 to <16 x i8>*
%32 = load <16 x i8>, <16 x i8>* %31
%33 = add nsw i64 %26, -1
%34 = getelementptr inbounds i8, i8* %0, i64 %33
%35 = bitcast i8* %34 to <16 x i8>*
store <16 x i8> %29, <16 x i8>* %35
%36 = getelementptr inbounds i8, i8* %34, i64 16
%37 = bitcast i8* %36 to <16 x i8>*
store <16 x i8> %32, <16 x i8>* %37
%38 = or i64 %24, 32
%39 = add i64 %38, %6
%40 = getelementptr inbounds i8, i8* %0, i64 %39
%41 = bitcast i8* %40 to <16 x i8>*
%42 = load <16 x i8>, <16 x i8>* %41
%43 = getelementptr inbounds i8, i8* %40, i64 16
%44 = bitcast i8* %43 to <16 x i8>*
%45 = load <16 x i8>, <16 x i8>* %44
%46 = add nsw i64 %39, -1
%47 = getelementptr inbounds i8, i8* %0, i64 %46
%48 = bitcast i8* %47 to <16 x i8>*
store <16 x i8> %42, <16 x i8>* %48
%49 = getelementptr inbounds i8, i8* %47, i64 16
%50 = bitcast i8* %49 to <16 x i8>*
store <16 x i8> %45, <16 x i8>* %50
%51 = add nuw i64 %24, 64
%52 = add i64 %25, 2
%53 = icmp eq i64 %52, %22
br i1 %53, label %54, label %23
54: ; preds = %23, %14
%55 = phi i64 [ 0, %14 ], [ %51, %23 ]
%56 = icmp eq i64 %19, 0
br i1 %56, label %70, label %57
57: ; preds = %54
%58 = add i64 %55, %6
%59 = getelementptr inbounds i8, i8* %0, i64 %58
%60 = bitcast i8* %59 to <16 x i8>*
%61 = load <16 x i8>, <16 x i8>* %60
%62 = getelementptr inbounds i8, i8* %59, i64 16
%63 = bitcast i8* %62 to <16 x i8>*
%64 = load <16 x i8>, <16 x i8>* %63
%65 = add nsw i64 %58, -1
%66 = getelementptr inbounds i8, i8* %0, i64 %65
%67 = bitcast i8* %66 to <16 x i8>*
store <16 x i8> %61, <16 x i8>* %67
%68 = getelementptr inbounds i8, i8* %66, i64 16
%69 = bitcast i8* %68 to <16 x i8>*
store <16 x i8> %64, <16 x i8>* %69
br label %70
70: ; preds = %54, %57
%71 = icmp eq i64 %10, %15
br i1 %71, label %107, label %72
72: ; preds = %70
%73 = add nsw i64 %15, %6
%74 = and i64 %10, 24
%75 = icmp eq i64 %74, 0
br i1 %75, label %96, label %76
76: ; preds = %12, %72
%77 = phi i64 [ %15, %72 ], [ 0, %12 ]
%78 = sub i32 %3, %1
%79 = zext i32 %78 to i64
%80 = add nuw nsw i64 %79, 1
%81 = and i64 %80, 8589934584
%82 = add nsw i64 %81, %6
br label %83
83: ; preds = %83, %76
%84 = phi i64 [ %77, %76 ], [ %92, %83 ]
%85 = add i64 %84, %6
%86 = getelementptr inbounds i8, i8* %0, i64 %85
%87 = bitcast i8* %86 to <8 x i8>*
%88 = load <8 x i8>, <8 x i8>* %87
%89 = add nsw i64 %85, -1
%90 = getelementptr inbounds i8, i8* %0, i64 %89
%91 = bitcast i8* %90 to <8 x i8>*
store <8 x i8> %88, <8 x i8>* %91
%92 = add nuw i64 %84, 8
%93 = icmp eq i64 %92, %81
br i1 %93, label %94, label %83
94: ; preds = %83
%95 = icmp eq i64 %80, %81
br i1 %95, label %107, label %96
96: ; preds = %5, %72, %94
%97 = phi i64 [ %6, %5 ], [ %73, %72 ], [ %82, %94 ]
br label %98
98: ; preds = %96, %98
%99 = phi i64 [ %104, %98 ], [ %97, %96 ]
%100 = getelementptr inbounds i8, i8* %0, i64 %99
%101 = load i8, i8* %100
%102 = add nsw i64 %99, -1
%103 = getelementptr inbounds i8, i8* %0, i64 %102
store i8 %101, i8* %103
%104 = add nsw i64 %99, 1
%105 = trunc i64 %104 to i32
%106 = icmp eq i32 %7, %105
br i1 %106, label %107, label %98
107: ; preds = %98, %70, %94, %2
ret void
}