long fatorial(long n) {
  long r = 1L;
  long f = n;
  while (f > 0L) {
    r = f * r;
    f = f - 1L;
  }
  return r;
}


x86 assembly (clang, -O0):
<fatorial>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movq   $0x1,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jle    1141 <fatorial+0x41>
mov    -0x18(%rbp),%rax
imul   -0x10(%rbp),%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1118 <fatorial+0x18>
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<fatorial>:
test   %rdi,%rdi
jle    1129 <fatorial+0x29>
lea    -0x1(%rdi),%rax
mov    %edi,%r9d
and    $0x7,%r9d
cmp    $0x7,%rax
jae    112f <fatorial+0x2f>
mov    $0x1,%eax
test   %r9,%r9
jne    11b0 <fatorial+0xb0>
jmp    11be <fatorial+0xbe>
mov    $0x1,%eax
ret
mov    %rdi,%r8
and    $0xfffffffffffffff8,%r8
neg    %r8
mov    $0x1,%eax
xor    %esi,%esi
lea    (%rdi,%rsi,1),%rdx
imul   %rax,%rdx
lea    (%rdi,%rsi,1),%rax
add    $0xffffffffffffffff,%rax
lea    (%rdi,%rsi,1),%rcx
add    $0xfffffffffffffffe,%rcx
imul   %rax,%rcx
imul   %rdx,%rcx
lea    (%rdi,%rsi,1),%rdx
add    $0xfffffffffffffffd,%rdx
lea    (%rdi,%rsi,1),%rax
add    $0xfffffffffffffffc,%rax
imul   %rdx,%rax
lea    (%rdi,%rsi,1),%rdx
add    $0xfffffffffffffffb,%rdx
imul   %rax,%rdx
imul   %rcx,%rdx
lea    (%rdi,%rsi,1),%rcx
add    $0xfffffffffffffffa,%rcx
lea    (%rdi,%rsi,1),%rax
add    $0xfffffffffffffff9,%rax
imul   %rcx,%rax
imul   %rdx,%rax
add    $0xfffffffffffffff8,%rsi
cmp    %rsi,%r8
jne    1140 <fatorial+0x40>
add    %rsi,%rdi
test   %r9,%r9
je     11be <fatorial+0xbe>
nopl   (%rax)
imul   %rdi,%rax
add    $0xffffffffffffffff,%rdi
add    $0xffffffffffffffff,%r9
jne    11b0 <fatorial+0xb0>
ret

LLVM IR (-O0):
define i64 @fatorial(i64 %0) {
%2 = alloca i64
%3 = alloca i64
%4 = alloca i64
store i64 %0, i64* %2
store i64 1, i64* %3
%5 = load i64, i64* %2
store i64 %5, i64* %4
br label %6
6: ; preds = %9, %1
%7 = load i64, i64* %4
%8 = icmp sgt i64 %7, 0
br i1 %8, label %9, label %15
9: ; preds = %6
%10 = load i64, i64* %4
%11 = load i64, i64* %3
%12 = mul nsw i64 %10, %11
store i64 %12, i64* %3
%13 = load i64, i64* %4
%14 = sub nsw i64 %13, 1
store i64 %14, i64* %4
br label %6
15: ; preds = %6
%16 = load i64, i64* %3
ret i64 %16
}

LLVM IR (-O2):
define i64 @fatorial(i64 %0) {
%2 = icmp sgt i64 %0, 0
br i1 %2, label %3, label %44
3: ; preds = %1
%4 = add i64 %0, -1
%5 = and i64 %0, 7
%6 = icmp ult i64 %4, 7
br i1 %6, label %31, label %7
7: ; preds = %3
%8 = and i64 %0, -8
br label %9
9: ; preds = %9, %7
%10 = phi i64 [ %0, %7 ], [ %28, %9 ]
%11 = phi i64 [ 1, %7 ], [ %27, %9 ]
%12 = phi i64 [ 0, %7 ], [ %29, %9 ]
%13 = mul nsw i64 %10, %11
%14 = add nsw i64 %10, -1
%15 = mul nsw i64 %14, %13
%16 = add nsw i64 %10, -2
%17 = mul nsw i64 %16, %15
%18 = add nsw i64 %10, -3
%19 = mul nsw i64 %18, %17
%20 = add nsw i64 %10, -4
%21 = mul nsw i64 %20, %19
%22 = add nsw i64 %10, -5
%23 = mul nsw i64 %22, %21
%24 = add nsw i64 %10, -6
%25 = mul nsw i64 %24, %23
%26 = add nsw i64 %10, -7
%27 = mul nsw i64 %26, %25
%28 = add nsw i64 %10, -8
%29 = add i64 %12, 8
%30 = icmp eq i64 %29, %8
br i1 %30, label %31, label %9
31: ; preds = %9, %3
%32 = phi i64 [ undef, %3 ], [ %27, %9 ]
%33 = phi i64 [ %0, %3 ], [ %28, %9 ]
%34 = phi i64 [ 1, %3 ], [ %27, %9 ]
%35 = icmp eq i64 %5, 0
br i1 %35, label %44, label %36
36: ; preds = %31, %36
%37 = phi i64 [ %41, %36 ], [ %33, %31 ]
%38 = phi i64 [ %40, %36 ], [ %34, %31 ]
%39 = phi i64 [ %42, %36 ], [ 0, %31 ]
%40 = mul nsw i64 %37, %38
%41 = add nsw i64 %37, -1
%42 = add i64 %39, 1
%43 = icmp eq i64 %42, %5
br i1 %43, label %44, label %36
44: ; preds = %31, %36, %1
%45 = phi i64 [ 1, %1 ], [ %32, %31 ], [ %40, %36 ]
ret i64 %45
}