void fac(int nlonin, int *nlonout, int *ierr) {
  int n2, n3, n5;
  int m;
  n2 = 0;
  n3 = 0;
  n5 = 0;
  m = nlonin;
  while (m % 2 == 0) {
    m = m / 2;
    n2++;
  }
  while (m % 3 == 0) {
    m = m / 3;
    n3++;
  }
  while (m % 5 == 0) {
    m = m / 5;
    n5++;
  }
  if (m == 1) {
    *nlonout = nlonin;
    *ierr = 0;
  } else {
    *nlonout = nlonin + 1;
    *ierr = 1;
  }
  return;
}


x86 assembly (clang, -O0):
<fac>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x4(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    115a <fac+0x5a>
mov    -0x28(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x28(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112a <fac+0x2a>
jmp    115f <fac+0x5f>
mov    -0x28(%rbp),%eax
mov    $0x3,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    118f <fac+0x8f>
mov    -0x28(%rbp),%eax
mov    $0x3,%ecx
cltd
idiv   %ecx
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    115f <fac+0x5f>
jmp    1194 <fac+0x94>
mov    -0x28(%rbp),%eax
mov    $0x5,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    11c4 <fac+0xc4>
mov    -0x28(%rbp),%eax
mov    $0x5,%ecx
cltd
idiv   %ecx
mov    %eax,-0x28(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1194 <fac+0x94>
cmpl   $0x1,-0x28(%rbp)
jne    11e6 <fac+0xe6>
mov    -0x4(%rbp),%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x18(%rbp),%rax
movl   $0x0,(%rax)
jmp    11fc <fac+0xfc>
mov    -0x4(%rbp),%ecx
add    $0x1,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x18(%rbp),%rax
movl   $0x1,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<fac>:
mov    %edi,%eax
test   $0x1,%dil
jne    111f <fac+0x1f>
mov    %edi,%ecx
nopw   0x0(%rax,%rax,1)
mov    %ecx,%eax
shr    $0x1f,%eax
add    %ecx,%eax
sar    %eax
mov    %eax,%ecx
test   $0x1,%al
je     1110 <fac+0x10>
imul   $0xaaaaaaab,%eax,%ecx
add    $0x2aaaaaaa,%ecx
cmp    $0x55555554,%ecx
ja     116a <fac+0x6a>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
cltq
imul   $0x55555556,%rax,%rax
mov    %rax,%rcx
shr    $0x3f,%rcx
shr    $0x20,%rax
add    %ecx,%eax
imul   $0xaaaaaaab,%eax,%ecx
add    $0x2aaaaaaa,%ecx
cmp    $0x55555555,%ecx
jb     1140 <fac+0x40>
imul   $0xcccccccd,%eax,%ecx
add    $0x19999999,%ecx
cmp    $0x33333332,%ecx
ja     11aa <fac+0xaa>
xchg   %ax,%ax
cltq
imul   $0x66666667,%rax,%rax
mov    %rax,%rcx
shr    $0x3f,%rcx
sar    $0x21,%rax
add    %ecx,%eax
imul   $0xcccccccd,%eax,%ecx
add    $0x19999999,%ecx
cmp    $0x33333333,%ecx
jb     1180 <fac+0x80>
xor    %ecx,%ecx
cmp    $0x1,%eax
setne  %cl
add    %ecx,%edi
mov    %edi,(%rsi)
mov    %ecx,(%rdx)
ret

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

LLVM IR (-O2):
define void @fac(i32 %0, i32* nocapture writeonly %1, i32* nocapture writeonly %2) {
%4 = and i32 %0, 1
%5 = icmp eq i32 %4, 0
br i1 %5, label %10, label %6
6: ; preds = %10, %3
%7 = phi i32 [ %0, %3 ], [ %12, %10 ]
%8 = srem i32 %7, 3
%9 = icmp eq i32 %8, 0
br i1 %9, label %19, label %15
10: ; preds = %3, %10
%11 = phi i32 [ %12, %10 ], [ %0, %3 ]
%12 = sdiv i32 %11, 2
%13 = and i32 %12, 1
%14 = icmp eq i32 %13, 0
br i1 %14, label %10, label %6
15: ; preds = %19, %6
%16 = phi i32 [ %7, %6 ], [ %21, %19 ]
%17 = srem i32 %16, 5
%18 = icmp eq i32 %17, 0
br i1 %18, label %24, label %29
19: ; preds = %6, %19
%20 = phi i32 [ %21, %19 ], [ %7, %6 ]
%21 = sdiv i32 %20, 3
%22 = srem i32 %21, 3
%23 = icmp eq i32 %22, 0
br i1 %23, label %19, label %15
24: ; preds = %15, %24
%25 = phi i32 [ %26, %24 ], [ %16, %15 ]
%26 = sdiv i32 %25, 5
%27 = srem i32 %26, 5
%28 = icmp eq i32 %27, 0
br i1 %28, label %24, label %29
29: ; preds = %24, %15
%30 = phi i32 [ %16, %15 ], [ %26, %24 ]
%31 = icmp ne i32 %30, 1
%32 = zext i1 %31 to i32
%33 = add nsw i32 %32, %0
store i32 %33, i32* %1
store i32 %32, i32* %2
ret void
}