long long int ft(int n) {
  long long int f;
  int i;
  for (i = f = 1; i <= n; ++i)
    f = (f * i) % 1000000007;
  return f;
}


x86 assembly (clang, -O0):
<ft>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
movq   $0x1,-0x10(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     114a <ft+0x4a>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
imul   %rcx,%rax
mov    $0x3b9aca07,%ecx
cqto
idiv   %rcx
mov    %rdx,-0x10(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1116 <ft+0x16>
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ft>:
test   %edi,%edi
jle    113b <ft+0x3b>
mov    %edi,%r11d
lea    -0x1(%r11),%rax
mov    %r11d,%r8d
and    $0x3,%r8d
movabs $0x89705f3112a28fe5,%r9
5f 70 89
cmp    $0x3,%rax
jae    1141 <ft+0x41>
mov    $0x1,%r10d
mov    $0x1,%ecx
test   %r8,%r8
jne    1220 <ft+0x120>
jmp    124f <ft+0x14f>
mov    $0x1,%eax
ret
and    $0xfffffffc,%r11d
neg    %r11
mov    $0x1,%ecx
mov    $0x2,%r10d
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    -0x1(%r10),%rsi
imul   %rcx,%rsi
mov    %rsi,%rax
imul   %r9
add    %rsi,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0x1d,%rdx
add    %rax,%rdx
imul   $0x3b9aca07,%rdx,%rax
sub    %rax,%rsi
imul   %r10,%rsi
mov    %rsi,%rax
imul   %r9
add    %rsi,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0x1d,%rdx
add    %rax,%rdx
imul   $0x3b9aca07,%rdx,%rax
sub    %rax,%rsi
lea    0x1(%r10),%rdi
imul   %rsi,%rdi
mov    %rdi,%rax
imul   %r9
add    %rdi,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0x1d,%rdx
add    %rax,%rdx
imul   $0x3b9aca07,%rdx,%rax
sub    %rax,%rdi
lea    0x2(%r10),%rcx
imul   %rdi,%rcx
mov    %rcx,%rax
imul   %r9
add    %rcx,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0x1d,%rdx
add    %rax,%rdx
imul   $0x3b9aca07,%rdx,%rax
sub    %rax,%rcx
lea    (%r11,%r10,1),%rax
add    $0x4,%rax
add    $0x4,%r10
cmp    $0x2,%rax
jne    1160 <ft+0x60>
add    $0xffffffffffffffff,%r10
test   %r8,%r8
je     124f <ft+0x14f>
nop
imul   %r10,%rcx
mov    %rcx,%rax
imul   %r9
add    %rcx,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0x1d,%rdx
add    %rax,%rdx
imul   $0x3b9aca07,%rdx,%rax
sub    %rax,%rcx
add    $0x1,%r10
add    $0xffffffffffffffff,%r8
jne    1220 <ft+0x120>
mov    %rcx,%rax
ret

LLVM IR (-O0):
define i64 @ft(i32 %0) {
%2 = alloca i32
%3 = alloca i64
%4 = alloca i32
store i32 %0, i32* %2
store i64 1, i64* %3
store i32 1, i32* %4
br label %5
5: ; preds = %15, %1
%6 = load i32, i32* %4
%7 = load i32, i32* %2
%8 = icmp sle i32 %6, %7
br i1 %8, label %9, label %18
9: ; preds = %5
%10 = load i64, i64* %3
%11 = load i32, i32* %4
%12 = sext i32 %11 to i64
%13 = mul nsw i64 %10, %12
%14 = srem i64 %13, 1000000007
store i64 %14, i64* %3
br label %15
15: ; preds = %9
%16 = load i32, i32* %4
%17 = add nsw i32 %16, 1
store i32 %17, i32* %4
br label %5
18: ; preds = %5
%19 = load i64, i64* %3
ret i64 %19
}

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