#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 string_length(char *);
void CToPascal(char *s) {
  int i, j;
  j = string_length(s);
  for (i = j; i != 0; i--)
    s[i] = s[i - 1];
  s[0] = j;
}


x86 assembly (clang, -O0):
<CToPascal>:
push   %rbp
mov    %rsp,%rbp
sub    $0x10,%rsp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <string_length@plt>
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0xc(%rbp)
cmpl   $0x0,-0xc(%rbp)
je     1161 <CToPascal+0x51>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0xc(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0xc(%rbp)
jmp    112e <CToPascal+0x1e>
mov    -0x10(%rbp),%eax
mov    %al,%cl
mov    -0x8(%rbp),%rax
mov    %cl,(%rax)
add    $0x10,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<CToPascal>:
push   %rbx
mov    %rdi,%rbx
call   1030 <string_length@plt>
mov    %eax,%esi
test   %eax,%eax
je     1163 <CToPascal+0x53>
movslq %eax,%rdi
lea    -0x1(%rax),%r8d
and    $0x3,%eax
je     1168 <CToPascal+0x58>
nopl   0x0(%rax,%rax,1)
lea    -0x1(%rdi),%rdx
movzbl -0x1(%rbx,%rdi,1),%ecx
mov    %cl,(%rbx,%rdi,1)
mov    %rdx,%rdi
add    $0xffffffff,%eax
jne    1130 <CToPascal+0x20>
cmp    $0x3,%r8d
jb     1163 <CToPascal+0x53>
nopw   0x0(%rax,%rax,1)
mov    -0x4(%rbx,%rdx,1),%eax
mov    %eax,-0x3(%rbx,%rdx,1)
lea    -0x4(%rdx),%rax
mov    %rax,%rdx
test   %eax,%eax
jne    1150 <CToPascal+0x40>
mov    %sil,(%rbx)
pop    %rbx
ret
mov    %rdi,%rdx
cmp    $0x3,%r8d
jae    1150 <CToPascal+0x40>
jmp    1163 <CToPascal+0x53>

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

LLVM IR (-O2):
define void @CToPascal(i8* %0) {
%2 = tail call i32 @string_length(i8* %0)
%3 = icmp eq i32 %2, 0
br i1 %3, label %41, label %4
4: ; preds = %1
%5 = sext i32 %2 to i64
%6 = add i32 %2, -1
%7 = and i32 %2, 3
%8 = icmp eq i32 %7, 0
br i1 %8, label %18, label %9
9: ; preds = %4, %9
%10 = phi i64 [ %12, %9 ], [ %5, %4 ]
%11 = phi i32 [ %16, %9 ], [ 0, %4 ]
%12 = add nsw i64 %10, -1
%13 = getelementptr inbounds i8, i8* %0, i64 %12
%14 = load i8, i8* %13
%15 = getelementptr inbounds i8, i8* %0, i64 %10
store i8 %14, i8* %15
%16 = add i32 %11, 1
%17 = icmp eq i32 %16, %7
br i1 %17, label %18, label %9
18: ; preds = %9, %4
%19 = phi i64 [ %5, %4 ], [ %12, %9 ]
%20 = icmp ult i32 %6, 3
br i1 %20, label %41, label %21
21: ; preds = %18, %21
%22 = phi i64 [ %35, %21 ], [ %19, %18 ]
%23 = add nsw i64 %22, -1
%24 = getelementptr inbounds i8, i8* %0, i64 %23
%25 = load i8, i8* %24
%26 = getelementptr inbounds i8, i8* %0, i64 %22
store i8 %25, i8* %26
%27 = add nsw i64 %22, -2
%28 = getelementptr inbounds i8, i8* %0, i64 %27
%29 = load i8, i8* %28
%30 = getelementptr inbounds i8, i8* %0, i64 %23
store i8 %29, i8* %30
%31 = add nsw i64 %22, -3
%32 = getelementptr inbounds i8, i8* %0, i64 %31
%33 = load i8, i8* %32
%34 = getelementptr inbounds i8, i8* %0, i64 %27
store i8 %33, i8* %34
%35 = add nsw i64 %22, -4
%36 = getelementptr inbounds i8, i8* %0, i64 %35
%37 = load i8, i8* %36
%38 = getelementptr inbounds i8, i8* %0, i64 %31
store i8 %37, i8* %38
%39 = trunc i64 %35 to i32
%40 = icmp eq i32 %39, 0
br i1 %40, label %41, label %21
41: ; preds = %18, %21, %1
%42 = trunc i32 %2 to i8
store i8 %42, i8* %0
ret void
}