int ft_ftohex2(char *s, double f) {
  int len_max;
  int i;
  i = 0;
  len_max = 14;
  f = f - (double)(int)f;
  while (f && --len_max) {
    f = f * 16.0;
    s[i++] = "0123456789abcdef"[(int)f];
    f = f - (double)(int)f;
  }
  return (i);
}


x86 assembly (clang, -O0):
<ft_ftohex2>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0xe,-0x14(%rbp)
movsd  -0x10(%rbp),%xmm0
cvttsd2si -0x10(%rbp),%eax
cvtsi2sd %eax,%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x10(%rbp)
movsd  -0x10(%rbp),%xmm0
xor    %eax,%eax
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x19(%rbp)
jne    1154 <ft_ftohex2+0x54>
jp     1154 <ft_ftohex2+0x54>
jmp    1166 <ft_ftohex2+0x66>
mov    -0x14(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x14(%rbp)
cmp    $0x0,%eax
setne  %al
mov    %al,-0x19(%rbp)
mov    -0x19(%rbp),%al
test   $0x1,%al
jne    1176 <ft_ftohex2+0x76>
jmp    11cb <ft_ftohex2+0xcb>
movsd  0xe82(%rip),%xmm0
mulsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
cvttsd2si -0x10(%rbp),%eax
movslq %eax,%rcx
lea    0xe71(%rip),%rax
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x18(%rbp)
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
movsd  -0x10(%rbp),%xmm0
cvttsd2si -0x10(%rbp),%eax
cvtsi2sd %eax,%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x10(%rbp)
jmp    1132 <ft_ftohex2+0x32>
mov    -0x18(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ft_ftohex2>:
cvttpd2dq %xmm0,%xmm1
cvtdq2pd %xmm1,%xmm1
subsd  %xmm1,%xmm0
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1118 <ft_ftohex2+0x18>
jnp    118b <ft_ftohex2+0x8b>
mov    $0x1,%eax
movsd  0xedb(%rip),%xmm2
lea    0xedc(%rip),%rcx
nopl   0x0(%rax)
mulsd  %xmm2,%xmm0
cvttsd2si %xmm0,%edx
movslq %edx,%rdx
movzbl (%rdx,%rcx,1),%edx
cvttpd2dq %xmm0,%xmm3
cvtdq2pd %xmm3,%xmm3
mov    %dl,-0x1(%rdi,%rax,1)
subsd  %xmm3,%xmm0
ucomisd %xmm1,%xmm0
jne    1157 <ft_ftohex2+0x57>
jnp    118a <ft_ftohex2+0x8a>
cmp    $0xd,%eax
je     118e <ft_ftohex2+0x8e>
mulsd  %xmm2,%xmm0
cvttsd2si %xmm0,%edx
movslq %edx,%rdx
movzbl (%rdx,%rcx,1),%edx
mov    %dl,(%rdi,%rax,1)
cvttpd2dq %xmm0,%xmm3
cvtdq2pd %xmm3,%xmm3
subsd  %xmm3,%xmm0
add    $0x2,%rax
ucomisd %xmm1,%xmm0
jne    1130 <ft_ftohex2+0x30>
jp     1130 <ft_ftohex2+0x30>
add    $0xffffffffffffffff,%rax
ret
xor    %eax,%eax
ret
mov    $0xd,%eax
ret

LLVM IR (-O0):
@.str = [17 x i8] c"0123456789abcdef\00"
define i32 @ft_ftohex2(i8* %0, double %1) {
%3 = alloca i8*
%4 = alloca double
%5 = alloca i32
%6 = alloca i32
store i8* %0, i8** %3
store double %1, double* %4
store i32 0, i32* %6
store i32 14, i32* %5
%7 = load double, double* %4
%8 = load double, double* %4
%9 = fptosi double %8 to i32
%10 = sitofp i32 %9 to double
%11 = fsub double %7, %10
store double %11, double* %4
br label %12
12: ; preds = %21, %2
%13 = load double, double* %4
%14 = fcmp une double %13, 0.000000e+00
br i1 %14, label %15, label %19
15: ; preds = %12
%16 = load i32, i32* %5
%17 = add nsw i32 %16, -1
store i32 %17, i32* %5
%18 = icmp ne i32 %17, 0
br label %19
19: ; preds = %15, %12
%20 = phi i1 [ false, %12 ], [ %18, %15 ]
br i1 %20, label %21, label %39
21: ; preds = %19
%22 = load double, double* %4
%23 = fmul double %22, 1.600000e+01
store double %23, double* %4
%24 = load double, double* %4
%25 = fptosi double %24 to i32
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds [17 x i8], [17 x i8]* @.str, i64 0, i64 %26
%28 = load i8, i8* %27
%29 = load i8*, i8** %3
%30 = load i32, i32* %6
%31 = add nsw i32 %30, 1
store i32 %31, i32* %6
%32 = sext i32 %30 to i64
%33 = getelementptr inbounds i8, i8* %29, i64 %32
store i8 %28, i8* %33
%34 = load double, double* %4
%35 = load double, double* %4
%36 = fptosi double %35 to i32
%37 = sitofp i32 %36 to double
%38 = fsub double %34, %37
store double %38, double* %4
br label %12
39: ; preds = %19
%40 = load i32, i32* %6
ret i32 %40
}

LLVM IR (-O2):
@.str = [17 x i8] c"0123456789abcdef\00"
define i32 @ft_ftohex2(i8* nocapture writeonly %0, double %1) {
%3 = fptosi double %1 to i32
%4 = sitofp i32 %3 to double
%5 = fsub double %1, %4
%6 = fcmp une double %5, 0.000000e+00
br i1 %6, label %7, label %38
7: ; preds = %2, %24
%8 = phi i64 [ %30, %24 ], [ 0, %2 ]
%9 = phi i32 [ %22, %24 ], [ 14, %2 ]
%10 = phi double [ %33, %24 ], [ %5, %2 ]
%11 = fmul double %10, 1.600000e+01
%12 = fptosi double %11 to i32
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds [17 x i8], [17 x i8]* @.str, i64 0, i64 %13
%15 = load i8, i8* %14
%16 = or i64 %8, 1
%17 = getelementptr inbounds i8, i8* %0, i64 %8
store i8 %15, i8* %17
%18 = sitofp i32 %12 to double
%19 = fsub double %11, %18
%20 = fcmp une double %19, 0.000000e+00
br i1 %20, label %21, label %35
21: ; preds = %7
%22 = add nsw i32 %9, -2
%23 = icmp eq i32 %22, 0
br i1 %23, label %38, label %24
24: ; preds = %21
%25 = fmul double %19, 1.600000e+01
%26 = fptosi double %25 to i32
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds [17 x i8], [17 x i8]* @.str, i64 0, i64 %27
%29 = load i8, i8* %28
%30 = add nuw nsw i64 %8, 2
%31 = getelementptr inbounds i8, i8* %0, i64 %16
store i8 %29, i8* %31
%32 = sitofp i32 %26 to double
%33 = fsub double %25, %32
%34 = fcmp une double %33, 0.000000e+00
br i1 %34, label %7, label %35
35: ; preds = %24, %7
%36 = phi i64 [ %16, %7 ], [ %30, %24 ]
%37 = trunc i64 %36 to i32
br label %38
38: ; preds = %21, %35, %2
%39 = phi i32 [ 0, %2 ], [ %37, %35 ], [ 13, %21 ]
ret i32 %39
}