#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 *ML_vram_adress();
void ML_vertical_scroll(int scroll) {
  int i, j;
  char column[64], *vram = ML_vram_adress();
  scroll %= 64;
  for (i = 0; i < 16; i++) {
    for (j = 0; j < 64; j++)
      column[j] = vram[(j << 4) + i];
    for (j = 0; j < 64; j++)
      vram[(j << 4) + i] = column[(j - scroll + 64) & 63];
  }
}


x86 assembly (clang, -O0):
<ML_vertical_scroll>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %edi,-0x4(%rbp)
mov    $0x0,%al
call   1030 <ML_vram_adress@plt>
mov    %rax,-0x58(%rbp)
mov    -0x4(%rbp),%eax
mov    $0x40,%ecx
cltd
idiv   %ecx
mov    %edx,-0x4(%rbp)
movl   $0x0,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jge    11d6 <ML_vertical_scroll+0xc6>
movl   $0x0,-0xc(%rbp)
cmpl   $0x40,-0xc(%rbp)
jge    117f <ML_vertical_scroll+0x6f>
mov    -0x58(%rbp),%rax
mov    -0xc(%rbp),%ecx
shl    $0x4,%ecx
add    -0x8(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%cl
movslq -0xc(%rbp),%rax
mov    %cl,-0x50(%rbp,%rax,1)
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    114c <ML_vertical_scroll+0x3c>
movl   $0x0,-0xc(%rbp)
cmpl   $0x40,-0xc(%rbp)
jge    11c3 <ML_vertical_scroll+0xb3>
mov    -0xc(%rbp),%eax
sub    -0x4(%rbp),%eax
add    $0x40,%eax
and    $0x3f,%eax
cltq
mov    -0x50(%rbp,%rax,1),%dl
mov    -0x58(%rbp),%rax
mov    -0xc(%rbp),%ecx
shl    $0x4,%ecx
add    -0x8(%rbp),%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    1186 <ML_vertical_scroll+0x76>
jmp    11c8 <ML_vertical_scroll+0xb8>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    113b <ML_vertical_scroll+0x2b>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ML_vertical_scroll>:
push   %rbp
push   %r14
push   %rbx
sub    $0x40,%rsp
mov    %edi,%r14d
xor    %ebp,%ebp
xor    %eax,%eax
call   1030 <ML_vram_adress@plt>
lea    0x30(%rax),%rcx
neg    %r14d
add    $0x10,%rax
nop
mov    %rcx,%rdx
xor    %esi,%esi
cs nopw 0x0(%rax,%rax,1)
nop
movzbl -0x30(%rdx),%ebx
mov    %bl,(%rsp,%rsi,1)
movzbl -0x20(%rdx),%ebx
mov    %bl,0x1(%rsp,%rsi,1)
movzbl -0x10(%rdx),%ebx
mov    %bl,0x2(%rsp,%rsi,1)
movzbl (%rdx),%ebx
mov    %bl,0x3(%rsp,%rsi,1)
add    $0x4,%rsi
add    $0x40,%rdx
cmp    $0x40,%rsi
jne    1140 <ML_vertical_scroll+0x30>
xor    %edx,%edx
mov    %r14d,%esi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %esi,%edi
and    $0x3f,%edi
movzbl (%rsp,%rdi,1),%ebx
mov    %bl,-0x10(%rax,%rdx,1)
lea    0x1(%rsi),%edi
and    $0x3f,%edi
movzbl (%rsp,%rdi,1),%ebx
mov    %bl,(%rax,%rdx,1)
add    $0x2,%esi
add    $0x20,%rdx
cmp    $0x400,%rdx
jne    1180 <ML_vertical_scroll+0x70>
add    $0x1,%rbp
add    $0x1,%rcx
add    $0x1,%rax
cmp    $0x10,%rbp
jne    1130 <ML_vertical_scroll+0x20>
add    $0x40,%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define void @ML_vertical_scroll(i32 %0) {
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca [64 x i8]
%6 = alloca i8*
store i32 %0, i32* %2
%7 = call i8* (...) @ML_vram_adress()
store i8* %7, i8** %6
%8 = load i32, i32* %2
%9 = srem i32 %8, 64
store i32 %9, i32* %2
store i32 0, i32* %3
br label %10
10: ; preds = %56, %1
%11 = load i32, i32* %3
%12 = icmp slt i32 %11, 16
br i1 %12, label %13, label %59
13: ; preds = %10
store i32 0, i32* %4
br label %14
14: ; preds = %29, %13
%15 = load i32, i32* %4
%16 = icmp slt i32 %15, 64
br i1 %16, label %17, label %32
17: ; preds = %14
%18 = load i8*, i8** %6
%19 = load i32, i32* %4
%20 = shl i32 %19, 4
%21 = load i32, i32* %3
%22 = add nsw i32 %20, %21
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i8, i8* %18, i64 %23
%25 = load i8, i8* %24
%26 = load i32, i32* %4
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds [64 x i8], [64 x i8]* %5, i64 0, i64 %27
store i8 %25, i8* %28
br label %29
29: ; preds = %17
%30 = load i32, i32* %4
%31 = add nsw i32 %30, 1
store i32 %31, i32* %4
br label %14
32: ; preds = %14
store i32 0, i32* %4
br label %33
33: ; preds = %52, %32
%34 = load i32, i32* %4
%35 = icmp slt i32 %34, 64
br i1 %35, label %36, label %55
36: ; preds = %33
%37 = load i32, i32* %4
%38 = load i32, i32* %2
%39 = sub nsw i32 %37, %38
%40 = add nsw i32 %39, 64
%41 = and i32 %40, 63
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds [64 x i8], [64 x i8]* %5, i64 0, i64 %42
%44 = load i8, i8* %43
%45 = load i8*, i8** %6
%46 = load i32, i32* %4
%47 = shl i32 %46, 4
%48 = load i32, i32* %3
%49 = add nsw i32 %47, %48
%50 = sext i32 %49 to i64
%51 = getelementptr inbounds i8, i8* %45, i64 %50
store i8 %44, i8* %51
br label %52
52: ; preds = %36
%53 = load i32, i32* %4
%54 = add nsw i32 %53, 1
store i32 %54, i32* %4
br label %33
55: ; preds = %33
br label %56
56: ; preds = %55
%57 = load i32, i32* %3
%58 = add nsw i32 %57, 1
store i32 %58, i32* %3
br label %10
59: ; preds = %10
ret void
}

LLVM IR (-O2):
define void @ML_vertical_scroll(i32 %0) {
%2 = alloca [64 x i8]
%3 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 0
%4 = tail call i8* (...) @ML_vram_adress()
br label %5
5: ; preds = %1, %57
%6 = phi i64 [ 0, %1 ], [ %58, %57 ]
br label %7
7: ; preds = %7, %5
%8 = phi i64 [ 0, %5 ], [ %32, %7 ]
%9 = shl nuw nsw i64 %8, 4
%10 = add nuw nsw i64 %9, %6
%11 = getelementptr inbounds i8, i8* %4, i64 %10
%12 = load i8, i8* %11
%13 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %8
store i8 %12, i8* %13
%14 = or i64 %8, 1
%15 = shl nuw nsw i64 %14, 4
%16 = add nuw nsw i64 %15, %6
%17 = getelementptr inbounds i8, i8* %4, i64 %16
%18 = load i8, i8* %17
%19 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %14
store i8 %18, i8* %19
%20 = or i64 %8, 2
%21 = shl nuw nsw i64 %20, 4
%22 = add nuw nsw i64 %21, %6
%23 = getelementptr inbounds i8, i8* %4, i64 %22
%24 = load i8, i8* %23
%25 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %20
store i8 %24, i8* %25
%26 = or i64 %8, 3
%27 = shl nuw nsw i64 %26, 4
%28 = add nuw nsw i64 %27, %6
%29 = getelementptr inbounds i8, i8* %4, i64 %28
%30 = load i8, i8* %29
%31 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %26
store i8 %30, i8* %31
%32 = add nuw nsw i64 %8, 4
%33 = icmp eq i64 %32, 64
br i1 %33, label %34, label %7
34: ; preds = %7, %34
%35 = phi i64 [ %55, %34 ], [ 0, %7 ]
%36 = trunc i64 %35 to i32
%37 = sub i32 %36, %0
%38 = and i32 %37, 63
%39 = zext i32 %38 to i64
%40 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %39
%41 = load i8, i8* %40
%42 = shl nuw nsw i64 %35, 4
%43 = add nuw nsw i64 %42, %6
%44 = getelementptr inbounds i8, i8* %4, i64 %43
store i8 %41, i8* %44
%45 = or i64 %35, 1
%46 = trunc i64 %45 to i32
%47 = sub i32 %46, %0
%48 = and i32 %47, 63
%49 = zext i32 %48 to i64
%50 = getelementptr inbounds [64 x i8], [64 x i8]* %2, i64 0, i64 %49
%51 = load i8, i8* %50
%52 = shl nuw nsw i64 %45, 4
%53 = add nuw nsw i64 %52, %6
%54 = getelementptr inbounds i8, i8* %4, i64 %53
store i8 %51, i8* %54
%55 = add nuw nsw i64 %35, 2
%56 = icmp eq i64 %55, 64
br i1 %56, label %57, label %34
57: ; preds = %34
%58 = add nuw nsw i64 %6, 1
%59 = icmp eq i64 %58, 16
br i1 %59, label %60, label %5
60: ; preds = %57
ret void
}