void pack8(unsigned char *c, unsigned char *bits) {
  *c = (bits[0] << 7) | (bits[1] << 6) | (bits[2] << 5) | (bits[3] << 4) |
       (bits[4] << 3) | (bits[5] << 2) | (bits[6] << 1) | (bits[7]);
}


x86 assembly (clang, -O0):
<pack8>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movzbl (%rax),%eax
shl    $0x7,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x1(%rcx),%ecx
shl    $0x6,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x2(%rcx),%ecx
shl    $0x5,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x3(%rcx),%ecx
shl    $0x4,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x4(%rcx),%ecx
shl    $0x3,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x5(%rcx),%ecx
shl    $0x2,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x6(%rcx),%ecx
shl    $0x1,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x7(%rcx),%ecx
or     %ecx,%eax
mov    %al,%cl
mov    -0x8(%rbp),%rax
mov    %cl,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<pack8>:
mov    (%rsi),%al
mov    0x1(%rsi),%cl
shl    $0x7,%al
shl    $0x6,%cl
or     %al,%cl
mov    0x2(%rsi),%al
shl    $0x5,%al
mov    0x3(%rsi),%dl
shl    $0x4,%dl
or     %al,%dl
or     %cl,%dl
mov    0x4(%rsi),%al
shl    $0x3,%al
mov    0x5(%rsi),%cl
shl    $0x2,%cl
or     %al,%cl
mov    0x6(%rsi),%al
add    %al,%al
or     %cl,%al
or     %dl,%al
or     0x7(%rsi),%al
mov    %al,(%rdi)
ret

LLVM IR (-O0):
define void @pack8(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
store i8* %0, i8** %3
store i8* %1, i8** %4
%5 = load i8*, i8** %4
%6 = getelementptr inbounds i8, i8* %5, i64 0
%7 = load i8, i8* %6
%8 = zext i8 %7 to i32
%9 = shl i32 %8, 7
%10 = load i8*, i8** %4
%11 = getelementptr inbounds i8, i8* %10, i64 1
%12 = load i8, i8* %11
%13 = zext i8 %12 to i32
%14 = shl i32 %13, 6
%15 = or i32 %9, %14
%16 = load i8*, i8** %4
%17 = getelementptr inbounds i8, i8* %16, i64 2
%18 = load i8, i8* %17
%19 = zext i8 %18 to i32
%20 = shl i32 %19, 5
%21 = or i32 %15, %20
%22 = load i8*, i8** %4
%23 = getelementptr inbounds i8, i8* %22, i64 3
%24 = load i8, i8* %23
%25 = zext i8 %24 to i32
%26 = shl i32 %25, 4
%27 = or i32 %21, %26
%28 = load i8*, i8** %4
%29 = getelementptr inbounds i8, i8* %28, i64 4
%30 = load i8, i8* %29
%31 = zext i8 %30 to i32
%32 = shl i32 %31, 3
%33 = or i32 %27, %32
%34 = load i8*, i8** %4
%35 = getelementptr inbounds i8, i8* %34, i64 5
%36 = load i8, i8* %35
%37 = zext i8 %36 to i32
%38 = shl i32 %37, 2
%39 = or i32 %33, %38
%40 = load i8*, i8** %4
%41 = getelementptr inbounds i8, i8* %40, i64 6
%42 = load i8, i8* %41
%43 = zext i8 %42 to i32
%44 = shl i32 %43, 1
%45 = or i32 %39, %44
%46 = load i8*, i8** %4
%47 = getelementptr inbounds i8, i8* %46, i64 7
%48 = load i8, i8* %47
%49 = zext i8 %48 to i32
%50 = or i32 %45, %49
%51 = trunc i32 %50 to i8
%52 = load i8*, i8** %3
store i8 %51, i8* %52
ret void
}

LLVM IR (-O2):
define void @pack8(i8* nocapture writeonly %0, i8* nocapture %1) {
%3 = load i8, i8* %1
%4 = shl i8 %3, 7
%5 = getelementptr inbounds i8, i8* %1, i64 1
%6 = load i8, i8* %5
%7 = shl i8 %6, 6
%8 = or i8 %7, %4
%9 = getelementptr inbounds i8, i8* %1, i64 2
%10 = load i8, i8* %9
%11 = shl i8 %10, 5
%12 = or i8 %8, %11
%13 = getelementptr inbounds i8, i8* %1, i64 3
%14 = load i8, i8* %13
%15 = shl i8 %14, 4
%16 = or i8 %12, %15
%17 = getelementptr inbounds i8, i8* %1, i64 4
%18 = load i8, i8* %17
%19 = shl i8 %18, 3
%20 = or i8 %16, %19
%21 = getelementptr inbounds i8, i8* %1, i64 5
%22 = load i8, i8* %21
%23 = shl i8 %22, 2
%24 = or i8 %20, %23
%25 = getelementptr inbounds i8, i8* %1, i64 6
%26 = load i8, i8* %25
%27 = shl i8 %26, 1
%28 = or i8 %24, %27
%29 = getelementptr inbounds i8, i8* %1, i64 7
%30 = load i8, i8* %29
%31 = or i8 %28, %30
store i8 %31, i8* %0
ret void
}