void blit_4_8(unsigned char pattern0, unsigned char pattern1,
              unsigned char pattern2, unsigned char pattern3,
              unsigned char count, unsigned char skip,
              const unsigned char *colors, unsigned char *vbp) {
  unsigned char pixel;
  int i;
  pattern0 <<= skip;
  pattern1 <<= skip;
  pattern2 <<= skip;
  pattern3 <<= skip;
  for (i = 0; i < count; i++) {
    pixel = ((pattern0 & 0x80) >> 4) | ((pattern1 & 0x80) >> 5) |
            ((pattern2 & 0x80) >> 6) | ((pattern3 & 0x80) >> 7);
    *vbp++ = colors[pixel];
    pattern0 <<= 1;
    pattern1 <<= 1;
    pattern2 <<= 1;
    pattern3 <<= 1;
  }
}


x86 assembly (clang, -O0):
<blit_4_8>:
push   %rbp
mov    %rsp,%rbp
mov    %r8d,-0x1c(%rbp)
mov    %ecx,%eax
mov    -0x1c(%rbp),%ecx
mov    %eax,-0x18(%rbp)
mov    %edx,%eax
mov    -0x18(%rbp),%edx
mov    %eax,-0x14(%rbp)
mov    %esi,%eax
mov    -0x14(%rbp),%esi
mov    %eax,-0x10(%rbp)
mov    %edi,%r8d
mov    -0x10(%rbp),%edi
mov    %r9b,%al
mov    0x18(%rbp),%r9
mov    0x10(%rbp),%r9
mov    %r8b,-0x1(%rbp)
mov    %dil,-0x2(%rbp)
mov    %sil,-0x3(%rbp)
mov    %dl,-0x4(%rbp)
mov    %cl,-0x5(%rbp)
mov    %al,-0x6(%rbp)
movzbl -0x6(%rbp),%ecx
movzbl -0x1(%rbp),%eax
shl    %cl,%eax
mov    %al,-0x1(%rbp)
movzbl -0x6(%rbp),%ecx
movzbl -0x2(%rbp),%eax
shl    %cl,%eax
mov    %al,-0x2(%rbp)
movzbl -0x6(%rbp),%ecx
movzbl -0x3(%rbp),%eax
shl    %cl,%eax
mov    %al,-0x3(%rbp)
movzbl -0x6(%rbp),%ecx
movzbl -0x4(%rbp),%eax
shl    %cl,%eax
mov    %al,-0x4(%rbp)
movl   $0x0,-0xc(%rbp)
mov    -0xc(%rbp),%eax
movzbl -0x5(%rbp),%ecx
cmp    %ecx,%eax
jge    121e <blit_4_8+0x11e>
movzbl -0x1(%rbp),%eax
and    $0x80,%eax
sar    $0x4,%eax
movzbl -0x2(%rbp),%ecx
and    $0x80,%ecx
sar    $0x5,%ecx
or     %ecx,%eax
movzbl -0x3(%rbp),%ecx
and    $0x80,%ecx
sar    $0x6,%ecx
or     %ecx,%eax
movzbl -0x4(%rbp),%ecx
and    $0x80,%ecx
sar    $0x7,%ecx
or     %ecx,%eax
mov    %al,-0x7(%rbp)
mov    0x10(%rbp),%rax
movzbl -0x7(%rbp),%ecx
mov    (%rax,%rcx,1),%cl
mov    0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,0x18(%rbp)
mov    %cl,(%rax)
movzbl -0x1(%rbp),%eax
shl    $0x1,%eax
mov    %al,-0x1(%rbp)
movzbl -0x2(%rbp),%eax
shl    $0x1,%eax
mov    %al,-0x2(%rbp)
movzbl -0x3(%rbp),%eax
shl    $0x1,%eax
mov    %al,-0x3(%rbp)
movzbl -0x4(%rbp),%eax
shl    $0x1,%eax
mov    %al,-0x4(%rbp)
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    1181 <blit_4_8+0x81>
pop    %rbp
ret

x86 assembly (clang, -O2):
<blit_4_8>:
push   %rbp
push   %r14
push   %rbx
test   %r8d,%r8d
je     1191 <blit_4_8+0x91>
movzbl %cl,%r14d
mov    %r9d,%ecx
shl    %cl,%r14d
movzbl %dl,%edx
shl    %cl,%edx
movzbl %sil,%esi
shl    %cl,%esi
movzbl %dil,%edi
shl    %cl,%edi
mov    0x28(%rsp),%r9
mov    0x20(%rsp),%r10
movzbl %r8b,%r8d
xor    %r11d,%r11d
nopl   0x0(%rax)
mov    %edi,%ecx
shr    $0x4,%ecx
and    $0x8,%ecx
mov    %esi,%ebx
shr    $0x5,%ebx
and    $0x4,%ebx
mov    %edx,%ebp
shr    $0x6,%ebp
and    $0x2,%ebp
mov    %r14d,%eax
shr    $0x7,%eax
and    $0x1,%eax
or     %ebp,%eax
or     %ebx,%eax
or     %ecx,%eax
movzbl (%r10,%rax,1),%eax
mov    %al,(%r9,%r11,1)
movzbl %dil,%edi
add    %edi,%edi
movzbl %sil,%esi
add    %esi,%esi
movzbl %dl,%edx
add    %edx,%edx
movzbl %r14b,%r14d
add    %r14d,%r14d
add    $0x1,%r11
cmp    %r11d,%r8d
jne    1140 <blit_4_8+0x40>
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define void @blit_4_8(i8 zeroext %0, i8 zeroext %1, i8 zeroext %2, i8 zeroext %3, i8 zeroext %4, i8 zeroext %5, i8* %6, i8* %7) {
%9 = alloca i8
%10 = alloca i8
%11 = alloca i8
%12 = alloca i8
%13 = alloca i8
%14 = alloca i8
%15 = alloca i8*
%16 = alloca i8*
%17 = alloca i8
%18 = alloca i32
store i8 %0, i8* %9
store i8 %1, i8* %10
store i8 %2, i8* %11
store i8 %3, i8* %12
store i8 %4, i8* %13
store i8 %5, i8* %14
store i8* %6, i8** %15
store i8* %7, i8** %16
%19 = load i8, i8* %14
%20 = zext i8 %19 to i32
%21 = load i8, i8* %9
%22 = zext i8 %21 to i32
%23 = shl i32 %22, %20
%24 = trunc i32 %23 to i8
store i8 %24, i8* %9
%25 = load i8, i8* %14
%26 = zext i8 %25 to i32
%27 = load i8, i8* %10
%28 = zext i8 %27 to i32
%29 = shl i32 %28, %26
%30 = trunc i32 %29 to i8
store i8 %30, i8* %10
%31 = load i8, i8* %14
%32 = zext i8 %31 to i32
%33 = load i8, i8* %11
%34 = zext i8 %33 to i32
%35 = shl i32 %34, %32
%36 = trunc i32 %35 to i8
store i8 %36, i8* %11
%37 = load i8, i8* %14
%38 = zext i8 %37 to i32
%39 = load i8, i8* %12
%40 = zext i8 %39 to i32
%41 = shl i32 %40, %38
%42 = trunc i32 %41 to i8
store i8 %42, i8* %12
store i32 0, i32* %18
br label %43
43: ; preds = %92, %8
%44 = load i32, i32* %18
%45 = load i8, i8* %13
%46 = zext i8 %45 to i32
%47 = icmp slt i32 %44, %46
br i1 %47, label %48, label %95
48: ; preds = %43
%49 = load i8, i8* %9
%50 = zext i8 %49 to i32
%51 = and i32 %50, 128
%52 = ashr i32 %51, 4
%53 = load i8, i8* %10
%54 = zext i8 %53 to i32
%55 = and i32 %54, 128
%56 = ashr i32 %55, 5
%57 = or i32 %52, %56
%58 = load i8, i8* %11
%59 = zext i8 %58 to i32
%60 = and i32 %59, 128
%61 = ashr i32 %60, 6
%62 = or i32 %57, %61
%63 = load i8, i8* %12
%64 = zext i8 %63 to i32
%65 = and i32 %64, 128
%66 = ashr i32 %65, 7
%67 = or i32 %62, %66
%68 = trunc i32 %67 to i8
store i8 %68, i8* %17
%69 = load i8*, i8** %15
%70 = load i8, i8* %17
%71 = zext i8 %70 to i64
%72 = getelementptr inbounds i8, i8* %69, i64 %71
%73 = load i8, i8* %72
%74 = load i8*, i8** %16
%75 = getelementptr inbounds i8, i8* %74, i32 1
store i8* %75, i8** %16
store i8 %73, i8* %74
%76 = load i8, i8* %9
%77 = zext i8 %76 to i32
%78 = shl i32 %77, 1
%79 = trunc i32 %78 to i8
store i8 %79, i8* %9
%80 = load i8, i8* %10
%81 = zext i8 %80 to i32
%82 = shl i32 %81, 1
%83 = trunc i32 %82 to i8
store i8 %83, i8* %10
%84 = load i8, i8* %11
%85 = zext i8 %84 to i32
%86 = shl i32 %85, 1
%87 = trunc i32 %86 to i8
store i8 %87, i8* %11
%88 = load i8, i8* %12
%89 = zext i8 %88 to i32
%90 = shl i32 %89, 1
%91 = trunc i32 %90 to i8
store i8 %91, i8* %12
br label %92
92: ; preds = %48
%93 = load i32, i32* %18
%94 = add nsw i32 %93, 1
store i32 %94, i32* %18
br label %43
95: ; preds = %43
ret void
}

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