long magnitude(double x) {
  double ref = 1.0;
  long xmag = 0;
  long refmag = 0;
  while (ref != 0) {
    ref = ref / 10.0;
    refmag++;
  }
  while (x != 0) {
    x = x / 10.0;
    xmag++;
  }
  return xmag - refmag;
}


x86 assembly (clang, -O0):
<magnitude>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
movsd  0xeef(%rip),%xmm0
movsd  %xmm0,-0x10(%rbp)
movq   $0x0,-0x18(%rbp)
movq   $0x0,-0x20(%rbp)
movsd  -0x10(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1143 <magnitude+0x43>
jp     1143 <magnitude+0x43>
jmp    116a <magnitude+0x6a>
movsd  -0x10(%rbp),%xmm0
movsd  0xeb8(%rip),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1126 <magnitude+0x26>
jmp    116f <magnitude+0x6f>
movsd  -0x8(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    118c <magnitude+0x8c>
jp     118c <magnitude+0x8c>
jmp    11b3 <magnitude+0xb3>
movsd  -0x8(%rbp),%xmm0
movsd  0xe6f(%rip),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x8(%rbp)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    116f <magnitude+0x6f>
mov    -0x18(%rbp),%rax
sub    -0x20(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<magnitude>:
movsd  0xef8(%rip),%xmm2
xor    %ecx,%ecx
movsd  0xef6(%rip),%xmm1
xorpd  %xmm3,%xmm3
cs nopw 0x0(%rax,%rax,1)
divsd  %xmm1,%xmm2
add    $0xffffffffffffffff,%rcx
ucomisd %xmm3,%xmm2
jne    1120 <magnitude+0x20>
jp     1120 <magnitude+0x20>
xorpd  %xmm2,%xmm2
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
ucomisd %xmm2,%xmm0
jne    1148 <magnitude+0x48>
jnp    1152 <magnitude+0x52>
divsd  %xmm1,%xmm0
add    $0x1,%rax
jmp    1140 <magnitude+0x40>
add    %rcx,%rax
ret

LLVM IR (-O0):
define i64 @magnitude(double %0) {
%2 = alloca double
%3 = alloca double
%4 = alloca i64
%5 = alloca i64
store double %0, double* %2
store double 1.000000e+00, double* %3
store i64 0, i64* %4
store i64 0, i64* %5
br label %6
6: ; preds = %9, %1
%7 = load double, double* %3
%8 = fcmp une double %7, 0.000000e+00
br i1 %8, label %9, label %14
9: ; preds = %6
%10 = load double, double* %3
%11 = fdiv double %10, 1.000000e+01
store double %11, double* %3
%12 = load i64, i64* %5
%13 = add nsw i64 %12, 1
store i64 %13, i64* %5
br label %6
14: ; preds = %6
br label %15
15: ; preds = %18, %14
%16 = load double, double* %2
%17 = fcmp une double %16, 0.000000e+00
br i1 %17, label %18, label %23
18: ; preds = %15
%19 = load double, double* %2
%20 = fdiv double %19, 1.000000e+01
store double %20, double* %2
%21 = load i64, i64* %4
%22 = add nsw i64 %21, 1
store i64 %22, i64* %4
br label %15
23: ; preds = %15
%24 = load i64, i64* %4
%25 = load i64, i64* %5
%26 = sub nsw i64 %24, %25
ret i64 %26
}

LLVM IR (-O2):
define i64 @magnitude(double %0) {
br label %4
2: ; preds = %4
%3 = fcmp une double %0, 0.000000e+00
br i1 %3, label %10, label %16
4: ; preds = %1, %4
%5 = phi i64 [ 0, %1 ], [ %8, %4 ]
%6 = phi double [ 1.000000e+00, %1 ], [ %7, %4 ]
%7 = fdiv double %6, 1.000000e+01
%8 = add nuw nsw i64 %5, 1
%9 = fcmp une double %7, 0.000000e+00
br i1 %9, label %4, label %2
10: ; preds = %2, %10
%11 = phi i64 [ %14, %10 ], [ 0, %2 ]
%12 = phi double [ %13, %10 ], [ %0, %2 ]
%13 = fdiv double %12, 1.000000e+01
%14 = add nuw nsw i64 %11, 1
%15 = fcmp une double %13, 0.000000e+00
br i1 %15, label %10, label %16
16: ; preds = %10, %2
%17 = phi i64 [ 0, %2 ], [ %14, %10 ]
%18 = sub nsw i64 %17, %8
ret i64 %18
}