Red_Image(ptr, Width, Height, X1, Y1, X2, Y2) {
  int x, y, p, b;
  for (y = Y1; y < Y2; y++) {
    p = ptr + 4 * ((Height - y) * Width + (X1 - 1));
    for (x = X1; x < X2; x++) {
      *(int *)p = *(int *)p & 0xFF0000;
      p = p + 4;
    }
  }
}


x86 assembly (clang, -O0):
<Red_Image>:
push   %rbp
mov    %rsp,%rbp
mov    0x10(%rbp),%eax
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    %r8d,-0x18(%rbp)
mov    %r9d,-0x1c(%rbp)
mov    -0x18(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    0x10(%rbp),%eax
jge    1198 <Red_Image+0x98>
mov    -0x8(%rbp),%eax
mov    -0x10(%rbp),%ecx
sub    -0x24(%rbp),%ecx
imul   -0xc(%rbp),%ecx
mov    -0x14(%rbp),%edx
sub    $0x1,%edx
add    %edx,%ecx
shl    $0x2,%ecx
add    %ecx,%eax
mov    %eax,-0x28(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1185 <Red_Image+0x85>
movslq -0x28(%rbp),%rax
mov    (%rax),%ecx
and    $0xff0000,%ecx
movslq -0x28(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x28(%rbp),%eax
add    $0x4,%eax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1150 <Red_Image+0x50>
jmp    118a <Red_Image+0x8a>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1121 <Red_Image+0x21>
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<Red_Image>:
push   %rbp
push   %r14
push   %rbx
mov    0x20(%rsp),%r10d
cmp    %r10d,%r8d
jge    11c5 <Red_Image+0xc5>
sub    %r8d,%edx
imul   %esi,%edx
lea    (%rdi,%rdx,4),%eax
lea    (%rax,%rcx,4),%edx
add    $0xfffffffc,%edx
shl    $0x2,%esi
neg    %esi
mov    %r9d,%r14d
sub    %ecx,%r14d
mov    %ecx,%r11d
not    %r11d
add    %r9d,%r11d
and    $0x3,%r14d
mov    %r14d,%edi
neg    %edi
jmp    114b <Red_Image+0x4b>
add    $0x1,%r8d
add    %esi,%edx
cmp    %r10d,%r8d
je     11c5 <Red_Image+0xc5>
cmp    %ecx,%r9d
jle    1140 <Red_Image+0x40>
movslq %edx,%rbx
test   %r14d,%r14d
je     1180 <Red_Image+0x80>
xor    %ebp,%ebp
nopw   0x0(%rax,%rax,1)
movzbl 0x2(%rbx),%eax
shl    $0x10,%eax
mov    %eax,(%rbx)
add    $0x4,%rbx
add    $0xffffffff,%ebp
cmp    %ebp,%edi
jne    1160 <Red_Image+0x60>
mov    %ecx,%eax
sub    %ebp,%eax
cmp    $0x3,%r11d
jb     1140 <Red_Image+0x40>
jmp    1188 <Red_Image+0x88>
mov    %ecx,%eax
cmp    $0x3,%r11d
jb     1140 <Red_Image+0x40>
mov    %r9d,%ebp
sub    %eax,%ebp
nopl   (%rax)
movzbl 0x2(%rbx),%eax
shl    $0x10,%eax
mov    %eax,(%rbx)
movzbl 0x6(%rbx),%eax
shl    $0x10,%eax
mov    %eax,0x4(%rbx)
movzbl 0xa(%rbx),%eax
shl    $0x10,%eax
mov    %eax,0x8(%rbx)
movzbl 0xe(%rbx),%eax
shl    $0x10,%eax
mov    %eax,0xc(%rbx)
add    $0x10,%rbx
add    $0xfffffffc,%ebp
jne    1190 <Red_Image+0x90>
jmp    1140 <Red_Image+0x40>
pop    %rbx
pop    %r14
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @Red_Image(i32 %0, i32 %1, i32 %2, i32 %3, i32 %4, i32 %5, i32 %6) {
%8 = icmp slt i32 %4, %6
br i1 %8, label %9, label %69
9: ; preds = %7
%10 = icmp sgt i32 %5, %3
%11 = sub i32 %2, %4
%12 = mul i32 %11, %1
%13 = shl i32 %12, 2
%14 = add i32 %13, %0
%15 = shl i32 %3, 2
%16 = add i32 %14, %15
%17 = add i32 %16, -4
%18 = mul i32 %1, -4
%19 = sub i32 %5, %3
%20 = xor i32 %3, -1
%21 = add i32 %20, %5
%22 = and i32 %19, 3
%23 = icmp eq i32 %22, 0
%24 = icmp ult i32 %21, 3
br label %25
25: ; preds = %9, %65
%26 = phi i32 [ %17, %9 ], [ %67, %65 ]
%27 = phi i32 [ %4, %9 ], [ %66, %65 ]
br i1 %10, label %28, label %65
28: ; preds = %25
%29 = sext i32 %26 to i64
br i1 %23, label %41, label %30
30: ; preds = %28, %30
%31 = phi i64 [ %37, %30 ], [ %29, %28 ]
%32 = phi i32 [ %38, %30 ], [ %3, %28 ]
%33 = phi i32 [ %39, %30 ], [ 0, %28 ]
%34 = inttoptr i64 %31 to i32*
%35 = load i32, i32* %34
%36 = and i32 %35, 16711680
store i32 %36, i32* %34
%37 = add nsw i64 %31, 4
%38 = add nsw i32 %32, 1
%39 = add i32 %33, 1
%40 = icmp eq i32 %39, %22
br i1 %40, label %41, label %30
41: ; preds = %30, %28
%42 = phi i64 [ %29, %28 ], [ %37, %30 ]
%43 = phi i32 [ %3, %28 ], [ %38, %30 ]
br i1 %24, label %65, label %44
44: ; preds = %41, %44
%45 = phi i64 [ %62, %44 ], [ %42, %41 ]
%46 = phi i32 [ %63, %44 ], [ %43, %41 ]
%47 = inttoptr i64 %45 to i32*
%48 = load i32, i32* %47
%49 = and i32 %48, 16711680
store i32 %49, i32* %47
%50 = add nsw i64 %45, 4
%51 = inttoptr i64 %50 to i32*
%52 = load i32, i32* %51
%53 = and i32 %52, 16711680
store i32 %53, i32* %51
%54 = add nsw i64 %45, 8
%55 = inttoptr i64 %54 to i32*
%56 = load i32, i32* %55
%57 = and i32 %56, 16711680
store i32 %57, i32* %55
%58 = add nsw i64 %45, 12
%59 = inttoptr i64 %58 to i32*
%60 = load i32, i32* %59
%61 = and i32 %60, 16711680
store i32 %61, i32* %59
%62 = add nsw i64 %45, 16
%63 = add nsw i32 %46, 4
%64 = icmp eq i32 %63, %5
br i1 %64, label %65, label %44
65: ; preds = %41, %44, %25
%66 = add nsw i32 %27, 1
%67 = add i32 %18, %26
%68 = icmp eq i32 %66, %6
br i1 %68, label %69, label %25
69: ; preds = %65, %7
ret i32 undef
}