int is_perfect_f(int a) {
  int sum = 0, i;
  for (i = 1; i < a / 2; ++i) {
    if (a % i == 0)
      sum += i;
  }
  if (a == sum)
    return 1;
  else
    return 0;
}


x86 assembly (clang, -O0):
<is_perfect_f>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x8(%rbp)
movl   $0x0,-0xc(%rbp)
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0x8(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x14(%rbp),%eax
cmp    %ecx,%eax
jge    115f <is_perfect_f+0x5f>
mov    -0x8(%rbp),%eax
cltd
idivl  -0x10(%rbp)
cmp    $0x0,%edx
jne    114c <is_perfect_f+0x4c>
mov    -0x10(%rbp),%eax
add    -0xc(%rbp),%eax
mov    %eax,-0xc(%rbp)
jmp    1151 <is_perfect_f+0x51>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1115 <is_perfect_f+0x15>
mov    -0x8(%rbp),%eax
cmp    -0xc(%rbp),%eax
jne    1177 <is_perfect_f+0x77>
movl   $0x1,-0x4(%rbp)
jmp    117e <is_perfect_f+0x7e>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<is_perfect_f>:
mov    %edi,%r10d
xor    %ecx,%ecx
cmp    $0x4,%edi
jl     1134 <is_perfect_f+0x34>
mov    %r10d,%eax
shr    %eax
lea    -0x1(%rax),%r8d
cmp    $0x2,%eax
jne    113d <is_perfect_f+0x3d>
xor    %ecx,%ecx
mov    $0x1,%esi
test   $0x1,%r8b
je     1134 <is_perfect_f+0x34>
mov    %r10d,%eax
cltd
idiv   %esi
xor    %eax,%eax
test   %edx,%edx
cmove  %esi,%eax
add    %eax,%ecx
xor    %eax,%eax
cmp    %r10d,%ecx
sete   %al
ret
mov    %r8d,%r9d
and    $0xfffffffe,%r9d
xor    %ecx,%ecx
mov    $0x1,%esi
jmp    115a <is_perfect_f+0x5a>
nopl   (%rax)
add    %eax,%ecx
add    $0x2,%esi
cmp    %r9d,%edi
je     111f <is_perfect_f+0x1f>
mov    %r10d,%eax
cltd
idiv   %esi
mov    %esi,%eax
test   %edx,%edx
je     1168 <is_perfect_f+0x68>
xor    %eax,%eax
add    %eax,%ecx
lea    0x1(%rsi),%edi
mov    %r10d,%eax
cltd
idiv   %edi
mov    %edi,%eax
test   %edx,%edx
je     1150 <is_perfect_f+0x50>
xor    %eax,%eax
jmp    1150 <is_perfect_f+0x50>

LLVM IR (-O0):
define i32 @is_perfect_f(i32 %0) {
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
store i32 %0, i32* %3
store i32 0, i32* %4
store i32 1, i32* %5
br label %6
6: ; preds = %21, %1
%7 = load i32, i32* %5
%8 = load i32, i32* %3
%9 = sdiv i32 %8, 2
%10 = icmp slt i32 %7, %9
br i1 %10, label %11, label %24
11: ; preds = %6
%12 = load i32, i32* %3
%13 = load i32, i32* %5
%14 = srem i32 %12, %13
%15 = icmp eq i32 %14, 0
br i1 %15, label %16, label %20
16: ; preds = %11
%17 = load i32, i32* %5
%18 = load i32, i32* %4
%19 = add nsw i32 %18, %17
store i32 %19, i32* %4
br label %20
20: ; preds = %16, %11
br label %21
21: ; preds = %20
%22 = load i32, i32* %5
%23 = add nsw i32 %22, 1
store i32 %23, i32* %5
br label %6
24: ; preds = %6
%25 = load i32, i32* %3
%26 = load i32, i32* %4
%27 = icmp eq i32 %25, %26
br i1 %27, label %28, label %29
28: ; preds = %24
store i32 1, i32* %2
br label %30
29: ; preds = %24
store i32 0, i32* %2
br label %30
30: ; preds = %29, %28
%31 = load i32, i32* %2
ret i32 %31
}

LLVM IR (-O2):
define i32 @is_perfect_f(i32 %0) {
%2 = icmp sgt i32 %0, 3
br i1 %2, label %3, label %36
3: ; preds = %1
%4 = lshr i32 %0, 1
%5 = add nsw i32 %4, -1
%6 = and i32 %5, 1
%7 = icmp eq i32 %4, 2
br i1 %7, label %26, label %8
8: ; preds = %3
%9 = and i32 %5, -2
br label %10
10: ; preds = %10, %8
%11 = phi i32 [ 1, %8 ], [ %23, %10 ]
%12 = phi i32 [ 0, %8 ], [ %22, %10 ]
%13 = phi i32 [ 0, %8 ], [ %24, %10 ]
%14 = srem i32 %0, %11
%15 = icmp eq i32 %14, 0
%16 = select i1 %15, i32 %11, i32 0
%17 = add nuw nsw i32 %16, %12
%18 = add nuw nsw i32 %11, 1
%19 = srem i32 %0, %18
%20 = icmp eq i32 %19, 0
%21 = select i1 %20, i32 %18, i32 0
%22 = add nuw nsw i32 %21, %17
%23 = add nuw nsw i32 %11, 2
%24 = add i32 %13, 2
%25 = icmp eq i32 %24, %9
br i1 %25, label %26, label %10
26: ; preds = %10, %3
%27 = phi i32 [ undef, %3 ], [ %22, %10 ]
%28 = phi i32 [ 1, %3 ], [ %23, %10 ]
%29 = phi i32 [ 0, %3 ], [ %22, %10 ]
%30 = icmp eq i32 %6, 0
br i1 %30, label %36, label %31
31: ; preds = %26
%32 = srem i32 %0, %28
%33 = icmp eq i32 %32, 0
%34 = select i1 %33, i32 %28, i32 0
%35 = add nuw nsw i32 %34, %29
br label %36
36: ; preds = %31, %26, %1
%37 = phi i32 [ 0, %1 ], [ %27, %26 ], [ %35, %31 ]
%38 = icmp eq i32 %37, %0
%39 = zext i1 %38 to i32
ret i32 %39
}