double get_double(char *c) {
  double x = 0.0;
  double exp = 1.0;
  for (; *c && *c != '.'; c++) {
    x *= 10.0;
    x += (double)(*c - '0');
  }
  if (*c == '.')
    c++;
  for (; *c; c++) {
    exp *= 10.0;
    x += (double)(*c - '0') / exp;
  }
  return x;
}


x86 assembly (clang, -O0):
<get_double>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x10(%rbp)
movsd  0xee8(%rip),%xmm0
movsd  %xmm0,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x19(%rbp)
je     1142 <get_double+0x42>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
setne  %al
mov    %al,-0x19(%rbp)
mov    -0x19(%rbp),%al
test   $0x1,%al
jne    1152 <get_double+0x52>
jmp    118d <get_double+0x8d>
movsd  0xeae(%rip),%xmm0
mulsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
cvtsi2sd %eax,%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    111d <get_double+0x1d>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    11a9 <get_double+0xa9>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    11ae <get_double+0xae>
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     11fb <get_double+0xfb>
movsd  0xe45(%rip),%xmm0
mulsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
cvtsi2sd %eax,%xmm0
divsd  -0x18(%rbp),%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    11ae <get_double+0xae>
movsd  -0x10(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<get_double>:
add    $0x1,%rdi
xorpd  %xmm0,%xmm0
movsd  0xef8(%rip),%xmm1
movsbl -0x1(%rdi),%eax
test   %eax,%eax
je     1134 <get_double+0x34>
cmp    $0x2e,%al
je     1134 <get_double+0x34>
mulsd  %xmm1,%xmm0
add    $0xffffffd0,%eax
xorps  %xmm2,%xmm2
cvtsi2sd %eax,%xmm2
addsd  %xmm2,%xmm0
add    $0x1,%rdi
jmp    1110 <get_double+0x10>
xor    %ecx,%ecx
cmp    $0x2e,%al
sete   %cl
mov    -0x1(%rdi,%rcx,1),%al
test   %al,%al
je     1174 <get_double+0x74>
add    %rcx,%rdi
movsd  0xeb2(%rip),%xmm2
xchg   %ax,%ax
mulsd  %xmm1,%xmm2
movsbl %al,%eax
add    $0xffffffd0,%eax
xorps  %xmm3,%xmm3
cvtsi2sd %eax,%xmm3
divsd  %xmm2,%xmm3
addsd  %xmm3,%xmm0
movzbl (%rdi),%eax
add    $0x1,%rdi
test   %al,%al
jne    1150 <get_double+0x50>
ret

LLVM IR (-O0):
define double @get_double(i8* %0) {
%2 = alloca i8*
%3 = alloca double
%4 = alloca double
store i8* %0, i8** %2
store double 0.000000e+00, double* %3
store double 1.000000e+00, double* %4
br label %5
5: ; preds = %27, %1
%6 = load i8*, i8** %2
%7 = load i8, i8* %6
%8 = sext i8 %7 to i32
%9 = icmp ne i32 %8, 0
br i1 %9, label %10, label %15
10: ; preds = %5
%11 = load i8*, i8** %2
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = icmp ne i32 %13, 46
br label %15
15: ; preds = %10, %5
%16 = phi i1 [ false, %5 ], [ %14, %10 ]
br i1 %16, label %17, label %30
17: ; preds = %15
%18 = load double, double* %3
%19 = fmul double %18, 1.000000e+01
store double %19, double* %3
%20 = load i8*, i8** %2
%21 = load i8, i8* %20
%22 = sext i8 %21 to i32
%23 = sub nsw i32 %22, 48
%24 = sitofp i32 %23 to double
%25 = load double, double* %3
%26 = fadd double %25, %24
store double %26, double* %3
br label %27
27: ; preds = %17
%28 = load i8*, i8** %2
%29 = getelementptr inbounds i8, i8* %28, i32 1
store i8* %29, i8** %2
br label %5
30: ; preds = %15
%31 = load i8*, i8** %2
%32 = load i8, i8* %31
%33 = sext i8 %32 to i32
%34 = icmp eq i32 %33, 46
br i1 %34, label %35, label %38
35: ; preds = %30
%36 = load i8*, i8** %2
%37 = getelementptr inbounds i8, i8* %36, i32 1
store i8* %37, i8** %2
br label %38
38: ; preds = %35, %30
br label %39
39: ; preds = %55, %38
%40 = load i8*, i8** %2
%41 = load i8, i8* %40
%42 = icmp ne i8 %41, 0
br i1 %42, label %43, label %58
43: ; preds = %39
%44 = load double, double* %4
%45 = fmul double %44, 1.000000e+01
store double %45, double* %4
%46 = load i8*, i8** %2
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = sub nsw i32 %48, 48
%50 = sitofp i32 %49 to double
%51 = load double, double* %4
%52 = fdiv double %50, %51
%53 = load double, double* %3
%54 = fadd double %53, %52
store double %54, double* %3
br label %55
55: ; preds = %43
%56 = load i8*, i8** %2
%57 = getelementptr inbounds i8, i8* %56, i32 1
store i8* %57, i8** %2
br label %39
58: ; preds = %39
%59 = load double, double* %3
ret double %59
}

LLVM IR (-O2):
define double @get_double(i8* nocapture %0) {
br label %2
2: ; preds = %6, %1
%3 = phi i8* [ %0, %1 ], [ %12, %6 ]
%4 = phi double [ 0.000000e+00, %1 ], [ %11, %6 ]
%5 = load i8, i8* %3
switch i8 %5, label %6 [
i8 0, label %13
i8 46, label %13
]
6: ; preds = %2
%7 = sext i8 %5 to i32
%8 = fmul double %4, 1.000000e+01
%9 = add nsw i32 %7, -48
%10 = sitofp i32 %9 to double
%11 = fadd double %8, %10
%12 = getelementptr inbounds i8, i8* %3, i64 1
br label %2
13: ; preds = %2, %2
%14 = icmp eq i8 %5, 46
%15 = zext i1 %14 to i64
%16 = getelementptr i8, i8* %3, i64 %15
%17 = load i8, i8* %16
%18 = icmp eq i8 %17, 0
br i1 %18, label %33, label %19
19: ; preds = %13, %19
%20 = phi i8 [ %31, %19 ], [ %17, %13 ]
%21 = phi double [ %24, %19 ], [ 1.000000e+00, %13 ]
%22 = phi double [ %29, %19 ], [ %4, %13 ]
%23 = phi i8* [ %30, %19 ], [ %16, %13 ]
%24 = fmul double %21, 1.000000e+01
%25 = sext i8 %20 to i32
%26 = add nsw i32 %25, -48
%27 = sitofp i32 %26 to double
%28 = fdiv double %27, %24
%29 = fadd double %22, %28
%30 = getelementptr inbounds i8, i8* %23, i64 1
%31 = load i8, i8* %30
%32 = icmp eq i8 %31, 0
br i1 %32, label %33, label %19
33: ; preds = %19, %13
%34 = phi double [ %4, %13 ], [ %29, %19 ]
ret double %34
}