unsigned long fatorial(unsigned long n, unsigned long l) {
  unsigned long i;
  unsigned long y;
  if (!n)
    return 1;
  else
    for (i = 0, y = 1; i < l; i++)
      y *= n - i;
  return y;
}


x86 assembly (clang, -O0):
<fatorial>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
cmpq   $0x0,-0x10(%rbp)
jne    1124 <fatorial+0x24>
movq   $0x1,-0x8(%rbp)
jmp    1171 <fatorial+0x71>
movq   $0x0,-0x20(%rbp)
movq   $0x1,-0x28(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    1164 <fatorial+0x64>
mov    -0x10(%rbp),%rax
sub    -0x20(%rbp),%rax
imul   -0x28(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1134 <fatorial+0x34>
jmp    1169 <fatorial+0x69>
mov    -0x28(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<fatorial>:
mov    $0x1,%eax
test   %rdi,%rdi
je     11ce <fatorial+0xce>
test   %rsi,%rsi
je     11ce <fatorial+0xce>
lea    -0x1(%rsi),%rax
mov    %esi,%r8d
and    $0x7,%r8d
cmp    $0x7,%rax
jae    113d <fatorial+0x3d>
mov    $0x1,%eax
xor    %edx,%edx
test   %r8,%r8
jne    11bd <fatorial+0xbd>
jmp    11ce <fatorial+0xce>
and    $0xfffffffffffffff8,%rsi
neg    %rsi
mov    $0x1,%eax
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
lea    (%rdi,%rdx,1),%rcx
imul   %rax,%rcx
lea    (%rdi,%rdx,1),%r9
add    $0xffffffffffffffff,%r9
lea    (%rdi,%rdx,1),%rax
add    $0xfffffffffffffffe,%rax
imul   %r9,%rax
imul   %rcx,%rax
lea    (%rdi,%rdx,1),%r9
add    $0xfffffffffffffffd,%r9
lea    (%rdi,%rdx,1),%r10
add    $0xfffffffffffffffc,%r10
imul   %r9,%r10
lea    (%rdi,%rdx,1),%rcx
add    $0xfffffffffffffffb,%rcx
imul   %r10,%rcx
imul   %rax,%rcx
lea    (%rdi,%rdx,1),%r9
add    $0xfffffffffffffffa,%r9
lea    (%rdi,%rdx,1),%rax
add    $0xfffffffffffffff9,%rax
imul   %r9,%rax
imul   %rcx,%rax
add    $0xfffffffffffffff8,%rdx
cmp    %rdx,%rsi
jne    1150 <fatorial+0x50>
neg    %rdx
test   %r8,%r8
je     11ce <fatorial+0xce>
sub    %rdx,%rdi
imul   %rdi,%rax
add    $0xffffffffffffffff,%rdi
add    $0xffffffffffffffff,%r8
jne    11c0 <fatorial+0xc0>
ret

LLVM IR (-O0):
define i64 @fatorial(i64 %0, i64 %1) {
%3 = alloca i64
%4 = alloca i64
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
store i64 %0, i64* %4
store i64 %1, i64* %5
%8 = load i64, i64* %4
%9 = icmp ne i64 %8, 0
br i1 %9, label %11, label %10
10: ; preds = %2
store i64 1, i64* %3
br label %28
11: ; preds = %2
store i64 0, i64* %6
store i64 1, i64* %7
br label %12
12: ; preds = %22, %11
%13 = load i64, i64* %6
%14 = load i64, i64* %5
%15 = icmp ult i64 %13, %14
br i1 %15, label %16, label %25
16: ; preds = %12
%17 = load i64, i64* %4
%18 = load i64, i64* %6
%19 = sub i64 %17, %18
%20 = load i64, i64* %7
%21 = mul i64 %20, %19
store i64 %21, i64* %7
br label %22
22: ; preds = %16
%23 = load i64, i64* %6
%24 = add i64 %23, 1
store i64 %24, i64* %6
br label %12
25: ; preds = %12
br label %26
26: ; preds = %25
%27 = load i64, i64* %7
store i64 %27, i64* %3
br label %28
28: ; preds = %26, %10
%29 = load i64, i64* %3
ret i64 %29
}

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