int sieve() {
  unsigned int flags[8190 + 1];
  int iter;
  int count;
  for (iter = 1; iter <= 10; iter++) {
    int i, prime, k;
    count = 0;
    for (i = 0; i <= 8190; i++)
      flags[i] = 1;
    for (i = 0; i <= 8190; i++) {
      if (flags[i]) {
        prime = i + i + 3;
        k = i + prime;
        while (k <= 8190) {
          flags[k] = 0;
          k += prime;
        }
        count++;
      }
    }
  }
  return count;
}


x86 assembly (clang, -O0):
<sieve>:
push   %rbp
mov    %rsp,%rbp
sub    $0x7fa0,%rsp
movl   $0x1,-0x8004(%rbp)
cmpl   $0xa,-0x8004(%rbp)
jg     123c <sieve+0x13c>
movl   $0x0,-0x8008(%rbp)
movl   $0x0,-0x800c(%rbp)
cmpl   $0x1ffe,-0x800c(%rbp)
jg     116c <sieve+0x6c>
movslq -0x800c(%rbp),%rax
movl   $0x1,-0x8000(%rbp,%rax,4)
mov    -0x800c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x800c(%rbp)
jmp    1136 <sieve+0x36>
movl   $0x0,-0x800c(%rbp)
cmpl   $0x1ffe,-0x800c(%rbp)
jg     1223 <sieve+0x123>
movslq -0x800c(%rbp),%rax
cmpl   $0x0,-0x8000(%rbp,%rax,4)
je     120a <sieve+0x10a>
mov    -0x800c(%rbp),%eax
add    -0x800c(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0x8010(%rbp)
mov    -0x800c(%rbp),%eax
add    -0x8010(%rbp),%eax
mov    %eax,-0x8014(%rbp)
cmpl   $0x1ffe,-0x8014(%rbp)
jg     11fb <sieve+0xfb>
movslq -0x8014(%rbp),%rax
movl   $0x0,-0x8000(%rbp,%rax,4)
mov    -0x8010(%rbp),%eax
add    -0x8014(%rbp),%eax
mov    %eax,-0x8014(%rbp)
jmp    11c2 <sieve+0xc2>
mov    -0x8008(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8008(%rbp)
jmp    120f <sieve+0x10f>
mov    -0x800c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x800c(%rbp)
jmp    1176 <sieve+0x76>
jmp    1228 <sieve+0x128>
mov    -0x8004(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8004(%rbp)
jmp    1115 <sieve+0x15>
mov    -0x8008(%rbp),%eax
add    $0x7fa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sieve>:
push   %r14
push   %rbx
sub    $0x7f88,%rsp
mov    $0x1,%r10d
lea    -0x74(%rsp),%r8
movaps 0xee4(%rip),%xmm0
movabs $0x100000001,%r9
jmp    113e <sieve+0x3e>
nopl   0x0(%rax,%rax,1)
add    $0x1,%r10d
cmp    $0xb,%r10d
je     1207 <sieve+0x107>
xor    %eax,%eax
movaps %xmm0,-0x80(%rsp,%rax,4)
movaps %xmm0,-0x70(%rsp,%rax,4)
movaps %xmm0,-0x60(%rsp,%rax,4)
movaps %xmm0,-0x50(%rsp,%rax,4)
movaps %xmm0,-0x40(%rsp,%rax,4)
movaps %xmm0,-0x30(%rsp,%rax,4)
add    $0x18,%rax
cmp    $0x1ff8,%rax
jne    1140 <sieve+0x40>
movaps %xmm0,0x7f60(%rsp)
mov    %r9,0x7f70(%rsp)
movl   $0x1,0x7f78(%rsp)
xor    %edi,%edi
mov    $0x3,%edx
mov    $0xc,%esi
mov    %r8,%r11
mov    $0x3,%r14d
xor    %eax,%eax
jmp    11c4 <sieve+0xc4>
xchg   %ax,%ax
add    $0x1,%eax
add    $0x1,%rdi
add    $0x3,%r14
add    $0x2,%rdx
add    $0xc,%r11
add    $0x8,%rsi
cmp    $0x1fff,%rdi
je     1130 <sieve+0x30>
cmpl   $0x0,-0x80(%rsp,%rdi,4)
je     11a3 <sieve+0xa3>
lea    (%rdi,%rdi,2),%rcx
add    $0x3,%rcx
cmp    $0x1ffe,%rcx
ja     11a0 <sieve+0xa0>
mov    %r11,%rbx
mov    %r14,%rcx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movl   $0x0,(%rbx)
add    %rdx,%rcx
add    %rsi,%rbx
cmp    $0x1fff,%rcx
jb     11f0 <sieve+0xf0>
jmp    11a0 <sieve+0xa0>
add    $0x7f88,%rsp
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define i32 @sieve() {
%1 = alloca [8191 x i32]
%2 = bitcast [8191 x i32]* %1 to i8*
%3 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8184
%4 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8185
%5 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8186
%6 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8187
%7 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8188
%8 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8189
%9 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 8190
br label %10
10: ; preds = %57, %0
%11 = phi i32 [ 1, %0 ], [ %58, %57 ]
br label %12
12: ; preds = %12, %10
%13 = phi i64 [ 0, %10 ], [ %28, %12 ]
%14 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 %13
%15 = bitcast i32* %14 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %15
%16 = getelementptr inbounds i32, i32* %14, i64 4
%17 = bitcast i32* %16 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %17
%18 = add nuw nsw i64 %13, 8
%19 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 %18
%20 = bitcast i32* %19 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %20
%21 = getelementptr inbounds i32, i32* %19, i64 4
%22 = bitcast i32* %21 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %22
%23 = add nuw nsw i64 %13, 16
%24 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 %23
%25 = bitcast i32* %24 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %25
%26 = getelementptr inbounds i32, i32* %24, i64 4
%27 = bitcast i32* %26 to <4 x i32>*
store <4 x i32> <i32 1, i32 1, i32 1, i32 1>, <4 x i32>* %27
%28 = add nuw nsw i64 %13, 24
%29 = icmp eq i64 %28, 8184
br i1 %29, label %30, label %12
30: ; preds = %12
store i32 1, i32* %3
store i32 1, i32* %4
store i32 1, i32* %5
store i32 1, i32* %6
store i32 1, i32* %7
store i32 1, i32* %8
store i32 1, i32* %9
br label %31
31: ; preds = %30, %51
%32 = phi i64 [ %53, %51 ], [ 0, %30 ]
%33 = phi i64 [ %55, %51 ], [ 3, %30 ]
%34 = phi i64 [ %54, %51 ], [ 3, %30 ]
%35 = phi i32 [ %52, %51 ], [ 0, %30 ]
%36 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 %32
%37 = load i32, i32* %36
%38 = icmp eq i32 %37, 0
br i1 %38, label %51, label %39
39: ; preds = %31
%40 = shl nuw nsw i64 %32, 1
%41 = add nuw nsw i64 %40, 3
%42 = add nuw nsw i64 %41, %32
%43 = icmp ult i64 %42, 8191
br i1 %43, label %44, label %49
44: ; preds = %39, %44
%45 = phi i64 [ %47, %44 ], [ %34, %39 ]
%46 = getelementptr inbounds [8191 x i32], [8191 x i32]* %1, i64 0, i64 %45
store i32 0, i32* %46
%47 = add nuw nsw i64 %45, %33
%48 = icmp ult i64 %47, 8191
br i1 %48, label %44, label %49
49: ; preds = %44, %39
%50 = add nsw i32 %35, 1
br label %51
51: ; preds = %31, %49
%52 = phi i32 [ %50, %49 ], [ %35, %31 ]
%53 = add nuw nsw i64 %32, 1
%54 = add nuw nsw i64 %34, 3
%55 = add nuw nsw i64 %33, 2
%56 = icmp eq i64 %53, 8191
br i1 %56, label %57, label %31
57: ; preds = %51
%58 = add nuw nsw i32 %11, 1
%59 = icmp eq i32 %58, 11
br i1 %59, label %60, label %10
60: ; preds = %57
ret i32 %52
}