double TLAString_toDoubleIfValid(const char *string,
                                 const double valueDefault) {
  const char sign = (*string);
  double value = 0;
  if ((*string) == '\0')
    return valueDefault;
  if (sign == '-' || sign == '+')
    string++;
  while ((*string) != '\0' && (*string) != '.') {
    if (((*string) < 48 || (*string) > 57) && (*string) != '.')
      return valueDefault;
    value = (value * 10.0f) + ((*string) - 48.0f);
    string++;
  }
  if ((*string) == '.') {
    float factorDivisor = 10.0f;
    string++;
    while ((*string) != '\0') {
      if (((*string) < 48 || (*string) > 57) && (*string) != '.')
        return valueDefault;
      value += (((*string) - 48.0f) / factorDivisor);
      factorDivisor *= 10.0f;
      string++;
    }
  }
  if (sign == '-')
    value = -value;
  return value;
}


x86 assembly (clang, -O0):
<TLAString_toDoubleIfValid>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x19(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    113d <TLAString_toDoubleIfValid+0x3d>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1324 <TLAString_toDoubleIfValid+0x224>
movsbl -0x19(%rbp),%eax
cmp    $0x2d,%eax
je     1157 <TLAString_toDoubleIfValid+0x57>
movsbl -0x19(%rbp),%eax
cmp    $0x2b,%eax
jne    1163 <TLAString_toDoubleIfValid+0x63>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1168 <TLAString_toDoubleIfValid+0x68>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x2d(%rbp)
je     118d <TLAString_toDoubleIfValid+0x8d>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
setne  %al
mov    %al,-0x2d(%rbp)
mov    -0x2d(%rbp),%al
test   $0x1,%al
jne    119d <TLAString_toDoubleIfValid+0x9d>
jmp    1222 <TLAString_toDoubleIfValid+0x122>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     11bd <TLAString_toDoubleIfValid+0xbd>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jle    11dc <TLAString_toDoubleIfValid+0xdc>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
je     11dc <TLAString_toDoubleIfValid+0xdc>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1324 <TLAString_toDoubleIfValid+0x224>
movsd  -0x28(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cvtsi2ss %eax,%xmm1
movss  0xe10(%rip),%xmm2
subss  %xmm2,%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xe04(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1168 <TLAString_toDoubleIfValid+0x68>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    12ec <TLAString_toDoubleIfValid+0x1ec>
movss  0xdc6(%rip),%xmm0
movss  %xmm0,-0x2c(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     12e7 <TLAString_toDoubleIfValid+0x1e7>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     127b <TLAString_toDoubleIfValid+0x17b>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jle    129a <TLAString_toDoubleIfValid+0x19a>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
je     129a <TLAString_toDoubleIfValid+0x19a>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1324 <TLAString_toDoubleIfValid+0x224>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cvtsi2ss %eax,%xmm0
movss  0xd57(%rip),%xmm1
subss  %xmm1,%xmm0
divss  -0x2c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
addsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
movss  0xd34(%rip),%xmm0
mulss  -0x2c(%rbp),%xmm0
movss  %xmm0,-0x2c(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    124b <TLAString_toDoubleIfValid+0x14b>
jmp    12ec <TLAString_toDoubleIfValid+0x1ec>
movsbl -0x19(%rbp),%eax
cmp    $0x2d,%eax
jne    131a <TLAString_toDoubleIfValid+0x21a>
movsd  -0x28(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<TLAString_toDoubleIfValid>:
mov    (%rdi),%al
test   %al,%al
je     1165 <TLAString_toDoubleIfValid+0x65>
cmp    $0x2d,%al
je     110e <TLAString_toDoubleIfValid+0xe>
cmp    $0x2b,%al
jne    1112 <TLAString_toDoubleIfValid+0x12>
add    $0x1,%rdi
add    $0x2,%rdi
xorpd  %xmm1,%xmm1
movss  0xee2(%rip),%xmm2
movsd  0xef6(%rip),%xmm3
jmp    114e <TLAString_toDoubleIfValid+0x4e>
nopl   0x0(%rax)
movsbl %cl,%ecx
xorps  %xmm4,%xmm4
cvtsi2ss %ecx,%xmm4
addss  %xmm2,%xmm4
cvtss2sd %xmm4,%xmm4
mulsd  %xmm3,%xmm1
addsd  %xmm4,%xmm1
add    $0x1,%rdi
movzbl -0x2(%rdi),%ecx
test   %cl,%cl
je     11b8 <TLAString_toDoubleIfValid+0xb8>
cmp    $0x2e,%cl
je     1166 <TLAString_toDoubleIfValid+0x66>
je     1130 <TLAString_toDoubleIfValid+0x30>
lea    -0x30(%rcx),%edx
cmp    $0x9,%dl
jbe    1130 <TLAString_toDoubleIfValid+0x30>
ret
mov    -0x1(%rdi),%cl
test   %cl,%cl
je     11b8 <TLAString_toDoubleIfValid+0xb8>
movss  0xe8b(%rip),%xmm3
movaps %xmm3,%xmm4
jmp    11a9 <TLAString_toDoubleIfValid+0xa9>
nopw   0x0(%rax,%rax,1)
movsbl %cl,%ecx
xorps  %xmm5,%xmm5
cvtsi2ss %ecx,%xmm5
addss  %xmm2,%xmm5
divss  %xmm4,%xmm5
cvtss2sd %xmm5,%xmm5
addsd  %xmm5,%xmm1
mulss  %xmm3,%xmm4
movzbl (%rdi),%ecx
add    $0x1,%rdi
test   %cl,%cl
je     11b8 <TLAString_toDoubleIfValid+0xb8>
cmp    $0x2e,%cl
je     1180 <TLAString_toDoubleIfValid+0x80>
lea    -0x30(%rcx),%edx
cmp    $0x9,%dl
jbe    1180 <TLAString_toDoubleIfValid+0x80>
jmp    1165 <TLAString_toDoubleIfValid+0x65>
cmp    $0x2d,%al
jne    11c4 <TLAString_toDoubleIfValid+0xc4>
xorpd  0xe4c(%rip),%xmm1
movapd %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @TLAString_toDoubleIfValid(i8* %0, double %1) {
%3 = alloca double
%4 = alloca i8*
%5 = alloca double
%6 = alloca i8
%7 = alloca double
%8 = alloca float
store i8* %0, i8** %4
store double %1, double* %5
%9 = load i8*, i8** %4
%10 = load i8, i8* %9
store i8 %10, i8* %6
store double 0.000000e+00, double* %7
%11 = load i8*, i8** %4
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = icmp eq i32 %13, 0
br i1 %14, label %15, label %17
15: ; preds = %2
%16 = load double, double* %5
store double %16, double* %3
br label %124
17: ; preds = %2
%18 = load i8, i8* %6
%19 = sext i8 %18 to i32
%20 = icmp eq i32 %19, 45
br i1 %20, label %25, label %21
21: ; preds = %17
%22 = load i8, i8* %6
%23 = sext i8 %22 to i32
%24 = icmp eq i32 %23, 43
br i1 %24, label %25, label %28
25: ; preds = %21, %17
%26 = load i8*, i8** %4
%27 = getelementptr inbounds i8, i8* %26, i32 1
store i8* %27, i8** %4
br label %28
28: ; preds = %25, %21
br label %29
29: ; preds = %58, %28
%30 = load i8*, i8** %4
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
%33 = icmp ne i32 %32, 0
br i1 %33, label %34, label %39
34: ; preds = %29
%35 = load i8*, i8** %4
%36 = load i8, i8* %35
%37 = sext i8 %36 to i32
%38 = icmp ne i32 %37, 46
br label %39
39: ; preds = %34, %29
%40 = phi i1 [ false, %29 ], [ %38, %34 ]
br i1 %40, label %41, label %69
41: ; preds = %39
%42 = load i8*, i8** %4
%43 = load i8, i8* %42
%44 = sext i8 %43 to i32
%45 = icmp slt i32 %44, 48
br i1 %45, label %51, label %46
46: ; preds = %41
%47 = load i8*, i8** %4
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = icmp sgt i32 %49, 57
br i1 %50, label %51, label %58
51: ; preds = %46, %41
%52 = load i8*, i8** %4
%53 = load i8, i8* %52
%54 = sext i8 %53 to i32
%55 = icmp ne i32 %54, 46
br i1 %55, label %56, label %58
56: ; preds = %51
%57 = load double, double* %5
store double %57, double* %3
br label %124
58: ; preds = %51, %46
%59 = load double, double* %7
%60 = load i8*, i8** %4
%61 = load i8, i8* %60
%62 = sext i8 %61 to i32
%63 = sitofp i32 %62 to float
%64 = fsub float %63, 4.800000e+01
%65 = fpext float %64 to double
%66 = call double @llvm.fmuladd.f64(double %59, double 1.000000e+01, double %65)
store double %66, double* %7
%67 = load i8*, i8** %4
%68 = getelementptr inbounds i8, i8* %67, i32 1
store i8* %68, i8** %4
br label %29
69: ; preds = %39
%70 = load i8*, i8** %4
%71 = load i8, i8* %70
%72 = sext i8 %71 to i32
%73 = icmp eq i32 %72, 46
br i1 %73, label %74, label %115
74: ; preds = %69
store float 1.000000e+01, float* %8
%75 = load i8*, i8** %4
%76 = getelementptr inbounds i8, i8* %75, i32 1
store i8* %76, i8** %4
br label %77
77: ; preds = %99, %74
%78 = load i8*, i8** %4
%79 = load i8, i8* %78
%80 = sext i8 %79 to i32
%81 = icmp ne i32 %80, 0
br i1 %81, label %82, label %114
82: ; preds = %77
%83 = load i8*, i8** %4
%84 = load i8, i8* %83
%85 = sext i8 %84 to i32
%86 = icmp slt i32 %85, 48
br i1 %86, label %92, label %87
87: ; preds = %82
%88 = load i8*, i8** %4
%89 = load i8, i8* %88
%90 = sext i8 %89 to i32
%91 = icmp sgt i32 %90, 57
br i1 %91, label %92, label %99
92: ; preds = %87, %82
%93 = load i8*, i8** %4
%94 = load i8, i8* %93
%95 = sext i8 %94 to i32
%96 = icmp ne i32 %95, 46
br i1 %96, label %97, label %99
97: ; preds = %92
%98 = load double, double* %5
store double %98, double* %3
br label %124
99: ; preds = %92, %87
%100 = load i8*, i8** %4
%101 = load i8, i8* %100
%102 = sext i8 %101 to i32
%103 = sitofp i32 %102 to float
%104 = fsub float %103, 4.800000e+01
%105 = load float, float* %8
%106 = fdiv float %104, %105
%107 = fpext float %106 to double
%108 = load double, double* %7
%109 = fadd double %108, %107
store double %109, double* %7
%110 = load float, float* %8
%111 = fmul float %110, 1.000000e+01
store float %111, float* %8
%112 = load i8*, i8** %4
%113 = getelementptr inbounds i8, i8* %112, i32 1
store i8* %113, i8** %4
br label %77
114: ; preds = %77
br label %115
115: ; preds = %114, %69
%116 = load i8, i8* %6
%117 = sext i8 %116 to i32
%118 = icmp eq i32 %117, 45
br i1 %118, label %119, label %122
119: ; preds = %115
%120 = load double, double* %7
%121 = fneg double %120
store double %121, double* %7
br label %122
122: ; preds = %119, %115
%123 = load double, double* %7
store double %123, double* %3
br label %124
124: ; preds = %122, %97, %56, %15
%125 = load double, double* %3
ret double %125
}

LLVM IR (-O2):
define double @TLAString_toDoubleIfValid(i8* nocapture %0, double %1) {
%3 = load i8, i8* %0
%4 = icmp eq i8 %3, 0
br i1 %4, label %53, label %5
5: ; preds = %2
%6 = icmp eq i8 %3, 45
switch i8 %3, label %9 [
i8 45, label %7
i8 43, label %7
]
7: ; preds = %5, %5
%8 = getelementptr inbounds i8, i8* %0, i64 1
br label %9
9: ; preds = %5, %7
%10 = phi i8* [ %0, %5 ], [ %8, %7 ]
br label %11
11: ; preds = %9, %24
%12 = phi i8* [ %29, %24 ], [ %10, %9 ]
%13 = phi double [ %28, %24 ], [ 0.000000e+00, %9 ]
%14 = load i8, i8* %12
switch i8 %14, label %19 [
i8 46, label %15
i8 0, label %49
]
15: ; preds = %11
%16 = getelementptr inbounds i8, i8* %12, i64 1
%17 = load i8, i8* %16
%18 = icmp eq i8 %17, 0
br i1 %18, label %49, label %30
19: ; preds = %11
%20 = add i8 %14, -48
%21 = icmp ult i8 %20, 10
%22 = icmp eq i8 %14, 46
%23 = or i1 %22, %21
br i1 %23, label %24, label %53
24: ; preds = %19
%25 = sitofp i8 %14 to float
%26 = fadd float %25, -4.800000e+01
%27 = fpext float %26 to double
%28 = tail call double @llvm.fmuladd.f64(double %13, double 1.000000e+01, double %27)
%29 = getelementptr inbounds i8, i8* %12, i64 1
br label %11
30: ; preds = %15, %39
%31 = phi i8 [ %47, %39 ], [ %17, %15 ]
%32 = phi i8* [ %46, %39 ], [ %16, %15 ]
%33 = phi float [ %45, %39 ], [ 1.000000e+01, %15 ]
%34 = phi double [ %44, %39 ], [ %13, %15 ]
%35 = add i8 %31, -48
%36 = icmp ult i8 %35, 10
%37 = icmp eq i8 %31, 46
%38 = or i1 %37, %36
br i1 %38, label %39, label %53
39: ; preds = %30
%40 = sitofp i8 %31 to float
%41 = fadd float %40, -4.800000e+01
%42 = fdiv float %41, %33
%43 = fpext float %42 to double
%44 = fadd double %34, %43
%45 = fmul float %33, 1.000000e+01
%46 = getelementptr inbounds i8, i8* %32, i64 1
%47 = load i8, i8* %46
%48 = icmp eq i8 %47, 0
br i1 %48, label %49, label %30
49: ; preds = %11, %39, %15
%50 = phi double [ %13, %15 ], [ %44, %39 ], [ %13, %11 ]
%51 = fneg double %50
%52 = select i1 %6, double %51, double %50
br label %53
53: ; preds = %19, %30, %2, %49
%54 = phi double [ %52, %49 ], [ %1, %2 ], [ %1, %30 ], [ %1, %19 ]
ret double %54
}