void pack(int value, int bits, char *array, int *pointer) {
  int i;
  for (i = 0; i < bits; (*pointer)++, i++)
    array[*pointer] = (char)((value & 1 << i) >> i);
}


x86 assembly (clang, -O0):
<pack>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %rdx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1164 <pack+0x64>
mov    -0x4(%rbp),%eax
mov    -0x1c(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
and    %ecx,%eax
mov    -0x1c(%rbp),%ecx
sar    %cl,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movslq (%rcx),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1119 <pack+0x19>
pop    %rbp
ret

x86 assembly (clang, -O2):
<pack>:
test   %esi,%esi
jle    1183 <pack+0x83>
mov    %rcx,%r8
mov    (%rcx),%r11d
xor    %r9d,%r9d
cmp    $0x1,%esi
je     1165 <pack+0x65>
mov    %esi,%r10d
and    $0xfffffffe,%r10d
xor    %r9d,%r9d
nopl   0x0(%rax)
mov    $0x1,%eax
mov    %r9d,%ecx
shl    %cl,%eax
and    %edi,%eax
sar    %cl,%eax
movslq %r11d,%rcx
mov    %al,(%rdx,%rcx,1)
movslq (%r8),%r11
lea    0x1(%r9),%ecx
mov    $0x1,%eax
shl    %cl,%eax
and    %edi,%eax
sar    %cl,%eax
lea    0x1(%r11),%rcx
mov    %ecx,(%r8)
mov    %al,0x1(%rdx,%r11,1)
mov    (%r8),%r11d
add    $0x1,%r11d
mov    %r11d,(%r8)
add    $0x2,%r9d
cmp    %r10d,%r9d
jne    1120 <pack+0x20>
test   $0x1,%sil
je     1183 <pack+0x83>
mov    $0x1,%eax
mov    %r9d,%ecx
shl    %cl,%eax
and    %edi,%eax
sar    %cl,%eax
movslq %r11d,%rcx
mov    %al,(%rdx,%rcx,1)
addl   $0x1,(%r8)
ret

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

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