int shift(unsigned int *c, unsigned int k) {
  unsigned int one = 1, carry = 0;
  int i;
  if (k == 0)
    return 1;
  else {
    for (i = 0; i < 15; i++) {
      carry = 0;
      if ((one << 31) & c[i])
        c[i - 1] = c[i - 1] | 1;
      c[i] <<= 1;
    }
    shift(c, k - 1);
  }
}


x86 assembly (clang, -O0):
<shift>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
movl   $0x1,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x0,-0x14(%rbp)
jne    1143 <shift+0x33>
movl   $0x1,-0x4(%rbp)
jmp    11c6 <shift+0xb6>
movl   $0x0,-0x20(%rbp)
cmpl   $0xf,-0x20(%rbp)
jge    11b7 <shift+0xa7>
movl   $0x0,-0x1c(%rbp)
mov    -0x18(%rbp),%eax
shl    $0x1f,%eax
mov    -0x10(%rbp),%rcx
movslq -0x20(%rbp),%rdx
and    (%rcx,%rdx,4),%eax
cmp    $0x0,%eax
je     1198 <shift+0x88>
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
or     $0x1,%edx
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
shl    $0x1,%edx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    114a <shift+0x3a>
mov    -0x10(%rbp),%rdi
mov    -0x14(%rbp),%esi
sub    $0x1,%esi
call   1030 <shift@plt>
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<shift>:
test   %esi,%esi
jne    1115 <shift+0x15>
mov    $0x1,%eax
ret
nopw   0x0(%rax,%rax,1)
add    $0xffffffff,%esi
je     1104 <shift+0x4>
xor    %eax,%eax
jmp    112a <shift+0x2a>
nopl   0x0(%rax)
add    %ecx,%ecx
mov    %ecx,0x4(%rdi,%rax,4)
add    $0x2,%rax
mov    (%rdi,%rax,4),%ecx
test   %ecx,%ecx
jns    1136 <shift+0x36>
orb    $0x1,-0x4(%rdi,%rax,4)
add    %ecx,%ecx
mov    %ecx,(%rdi,%rax,4)
cmp    $0xe,%rax
je     1110 <shift+0x10>
mov    0x4(%rdi,%rax,4),%ecx
test   %ecx,%ecx
jns    1120 <shift+0x20>
orb    $0x1,(%rdi,%rax,4)
jmp    1120 <shift+0x20>

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

LLVM IR (-O2):
define i32 @shift(i32* nocapture %0, i32 %1) {
%3 = icmp eq i32 %1, 0
br i1 %3, label %34, label %4
4: ; preds = %2, %31
%5 = phi i32 [ %32, %31 ], [ %1, %2 ]
br label %6
6: ; preds = %28, %4
%7 = phi i64 [ 0, %4 ], [ %30, %28 ]
%8 = getelementptr inbounds i32, i32* %0, i64 %7
%9 = load i32, i32* %8
%10 = icmp sgt i32 %9, -1
br i1 %10, label %16, label %11
11: ; preds = %6
%12 = add nsw i64 %7, -1
%13 = getelementptr inbounds i32, i32* %0, i64 %12
%14 = load i32, i32* %13
%15 = or i32 %14, 1
store i32 %15, i32* %13
br label %16
16: ; preds = %11, %6
%17 = shl i32 %9, 1
store i32 %17, i32* %8
%18 = or i64 %7, 1
%19 = icmp eq i64 %18, 15
br i1 %19, label %31, label %20
20: ; preds = %16
%21 = getelementptr inbounds i32, i32* %0, i64 %18
%22 = load i32, i32* %21
%23 = icmp sgt i32 %22, -1
br i1 %23, label %28, label %24
24: ; preds = %20
%25 = getelementptr inbounds i32, i32* %0, i64 %7
%26 = load i32, i32* %25
%27 = or i32 %26, 1
store i32 %27, i32* %25
br label %28
28: ; preds = %24, %20
%29 = shl i32 %22, 1
store i32 %29, i32* %21
%30 = add nuw nsw i64 %7, 2
br label %6
31: ; preds = %16
%32 = add i32 %5, -1
%33 = icmp eq i32 %32, 0
br i1 %33, label %34, label %4
34: ; preds = %31, %2
ret i32 1
}