void insert_value(unsigned char binary_stream[], const int posn,
                  const int streamlen, const int newbit) {
  int i;
  for (i = streamlen; i > posn; i--) {
    binary_stream[i] = binary_stream[i - 1];
  }
  binary_stream[posn] = (unsigned char)newbit;
}


x86 assembly (clang, -O0):
<insert_value>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0xc(%rbp),%eax
jle    114c <insert_value+0x4c>
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x18(%rbp)
jmp    1117 <insert_value+0x17>
mov    -0x14(%rbp),%eax
mov    %al,%dl
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
pop    %rbp
ret

x86 assembly (clang, -O2):
<insert_value>:
mov    %edx,%r10d
sub    %esi,%r10d
jle    1159 <insert_value+0x59>
movslq %edx,%rdx
movslq %esi,%r9
mov    %r9,%r8
not    %r8
add    %rdx,%r8
and    $0x3,%r10
je     1161 <insert_value+0x61>
nopl   (%rax)
lea    -0x1(%rdx),%rsi
movzbl -0x1(%rdi,%rdx,1),%eax
mov    %al,(%rdi,%rdx,1)
mov    %rsi,%rdx
add    $0xffffffffffffffff,%r10
jne    1120 <insert_value+0x20>
cmp    $0x3,%r8
jb     1154 <insert_value+0x54>
nopl   0x0(%rax,%rax,1)
mov    -0x4(%rdi,%rsi,1),%eax
mov    %eax,-0x3(%rdi,%rsi,1)
lea    -0x4(%rsi),%rax
mov    %rax,%rsi
cmp    %r9,%rax
jg     1140 <insert_value+0x40>
mov    %cl,(%rdi,%r9,1)
ret
movslq %esi,%r9
mov    %cl,(%rdi,%r9,1)
ret
mov    %rdx,%rsi
cmp    $0x3,%r8
jae    1140 <insert_value+0x40>
jmp    1154 <insert_value+0x54>

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

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