#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
char *get_sign(char const *, int *, int *);
scalar_t__ is_digit(char const);
extern double str_real(const char *s, int *error) {
  *error = 0;
  int sign;
  s = get_sign(s, &sign, error);
  register long double val;
  for (val = 0; *s && *s != '.' && !*error; ++s)
    if (is_digit(*s))
      val = 10 * val + (*s - '0');
    else
      *error = 1;
  if (*s == '.' && !*error) {
    if (*(++s) != '\0') {
      double fract, div;
      for (fract = 0, div = 10; *s && !*error; ++s, div *= 10)
        if (is_digit(*s))
          fract = fract + (*s - '0') / div;
        else
          *error = 1;
      val += fract;
    } else
      *error = 1;
  }
  return (double)sign * val;
}


x86 assembly (clang, -O0):
<str_real>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rdx
lea    -0x14(%rbp),%rsi
call   1030 <get_sign@plt>
mov    %rax,-0x8(%rbp)
fldz
fstpt  -0x30(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x55(%rbp)
je     118d <str_real+0x6d>
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x2e,%ecx
mov    %al,-0x55(%rbp)
je     118d <str_real+0x6d>
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
setne  %al
xor    $0xff,%al
mov    %al,-0x55(%rbp)
mov    -0x55(%rbp),%al
test   $0x1,%al
jne    119d <str_real+0x7d>
jmp    11f8 <str_real+0xd8>
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1040 <is_digit@plt>
cmp    $0x0,%rax
je     11d8 <str_real+0xb8>
fldt   -0x30(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
add    $0xffffffd0,%eax
mov    %eax,-0x54(%rbp)
fildl  -0x54(%rbp)
flds   0xe3c(%rip)
fmulp  %st,%st(2)
faddp  %st,%st(1)
fstpt  -0x30(%rbp)
jmp    11e2 <str_real+0xc2>
mov    -0x10(%rbp),%rax
movl   $0x1,(%rax)
jmp    11e7 <str_real+0xc7>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1154 <str_real+0x34>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1307 <str_real+0x1e7>
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
jne    1307 <str_real+0x1e7>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl 0x1(%rax),%eax
cmp    $0x0,%eax
je     12f8 <str_real+0x1d8>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xdbf(%rip),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x56(%rbp)
je     126a <str_real+0x14a>
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
setne  %al
xor    $0xff,%al
mov    %al,-0x56(%rbp)
mov    -0x56(%rbp),%al
test   $0x1,%al
jne    127a <str_real+0x15a>
jmp    12e8 <str_real+0x1c8>
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1040 <is_digit@plt>
cmp    $0x0,%rax
je     12b6 <str_real+0x196>
movsd  -0x38(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
cvtsi2sd %eax,%xmm1
divsd  -0x40(%rbp),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
jmp    12c0 <str_real+0x1a0>
mov    -0x10(%rbp),%rax
movl   $0x1,(%rax)
jmp    12c5 <str_real+0x1a5>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
movsd  0xd27(%rip),%xmm0
mulsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
jmp    1246 <str_real+0x126>
fldl   -0x38(%rbp)
fldt   -0x30(%rbp)
faddp  %st,%st(1)
fstpt  -0x30(%rbp)
jmp    1302 <str_real+0x1e2>
mov    -0x10(%rbp),%rax
movl   $0x1,(%rax)
jmp    1307 <str_real+0x1e7>
cvtsi2sdl -0x14(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
fldl   -0x48(%rbp)
fldt   -0x30(%rbp)
fmulp  %st,%st(1)
fstpl  -0x50(%rbp)
movsd  -0x50(%rbp),%xmm0
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<str_real>:
push   %r14
push   %rbx
sub    $0x48,%rsp
mov    %rsi,%r14
movl   $0x0,(%rsi)
lea    0x2c(%rsp),%rsi
mov    %r14,%rdx
call   1030 <get_sign@plt>
mov    %rax,%rbx
add    $0x2,%rbx
fldz
fstpt  0xc(%rsp)
jmp    1171 <str_real+0x51>
nopl   0x0(%rax)
movsbl -0x2(%rbx),%eax
add    $0xffffffd0,%eax
fldt   0xc(%rsp)
fmuls  0xea7(%rip)
mov    %eax,0x24(%rsp)
fiaddl 0x24(%rsp)
fstpt  0xc(%rsp)
add    $0x1,%rbx
movzbl -0x2(%rbx),%eax
test   %al,%al
je     1257 <str_real+0x137>
cmp    $0x2e,%al
je     11a5 <str_real+0x85>
cmpl   $0x0,(%r14)
jne    1257 <str_real+0x137>
movsbl %al,%edi
call   1040 <is_digit@plt>
test   %rax,%rax
jne    1150 <str_real+0x30>
movl   $0x1,(%r14)
add    $0x1,%rbx
jmp    1171 <str_real+0x51>
cmpl   $0x0,(%r14)
jne    1257 <str_real+0x137>
mov    -0x1(%rbx),%al
test   %al,%al
je     1250 <str_real+0x130>
movsd  0xe3e(%rip),%xmm2
xorpd  %xmm0,%xmm0
movsd  %xmm0,0x18(%rsp)
nopl   0x0(%rax)
movsd  %xmm2,0x30(%rsp)
movsbl %al,%edi
call   1040 <is_digit@plt>
test   %rax,%rax
je     1210 <str_real+0xf0>
movsbl -0x1(%rbx),%eax
add    $0xffffffd0,%eax
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x30(%rsp),%xmm2
divsd  %xmm2,%xmm0
movsd  0x18(%rsp),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,0x18(%rsp)
jmp    121d <str_real+0xfd>
nopl   (%rax)
movl   $0x1,(%r14)
movsd  0x30(%rsp),%xmm2
movzbl (%rbx),%eax
test   %al,%al
je     1236 <str_real+0x116>
mulsd  0xdd4(%rip),%xmm2
add    $0x1,%rbx
cmpl   $0x0,(%r14)
je     11d0 <str_real+0xb0>
movsd  0x18(%rsp),%xmm0
movsd  %xmm0,0x40(%rsp)
fldt   0xc(%rsp)
faddl  0x40(%rsp)
fstpt  0xc(%rsp)
jmp    1257 <str_real+0x137>
movl   $0x1,(%r14)
mov    0x2c(%rsp),%eax
mov    %eax,0x28(%rsp)
fldt   0xc(%rsp)
fimull 0x28(%rsp)
fstpl  0x38(%rsp)
movsd  0x38(%rsp),%xmm0
add    $0x48,%rsp
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define double @str_real(i8* %0, i32* %1) {
%3 = alloca i32
store i32 0, i32* %1
%4 = bitcast i32* %3 to i8*
%5 = call i8* @get_sign(i8* %0, i32* %3, i32* %1)
br label %6
6: ; preds = %23, %2
%7 = phi i8* [ %5, %2 ], [ %25, %23 ]
%8 = phi x86_fp80 [ 0xK00000000000000000000, %2 ], [ %24, %23 ]
%9 = load i8, i8* %7
switch i8 %9, label %10 [
i8 46, label %26
i8 0, label %61
]
10: ; preds = %6
%11 = load i32, i32* %1
%12 = icmp eq i32 %11, 0
br i1 %12, label %13, label %61
13: ; preds = %10
%14 = call i64 @is_digit(i8 signext %9)
%15 = icmp eq i64 %14, 0
br i1 %15, label %22, label %16
16: ; preds = %13
%17 = load i8, i8* %7
%18 = sext i8 %17 to i32
%19 = add nsw i32 %18, -48
%20 = sitofp i32 %19 to x86_fp80
%21 = call x86_fp80 @llvm.fmuladd.f80(x86_fp80 %8, x86_fp80 0xK4002A000000000000000, x86_fp80 %20)
br label %23
22: ; preds = %13
store i32 1, i32* %1
br label %23
23: ; preds = %16, %22
%24 = phi x86_fp80 [ %21, %16 ], [ %8, %22 ]
%25 = getelementptr inbounds i8, i8* %7, i64 1
br label %6
26: ; preds = %6
%27 = load i32, i32* %1
%28 = icmp eq i32 %27, 0
br i1 %28, label %29, label %61
29: ; preds = %26
%30 = getelementptr inbounds i8, i8* %7, i64 1
%31 = load i8, i8* %30
%32 = icmp eq i8 %31, 0
br i1 %32, label %60, label %33
33: ; preds = %29, %53
%34 = phi i8 [ %51, %53 ], [ %31, %29 ]
%35 = phi i8* [ %50, %53 ], [ %30, %29 ]
%36 = phi double [ %49, %53 ], [ 0.000000e+00, %29 ]
%37 = phi double [ %54, %53 ], [ 1.000000e+01, %29 ]
%38 = call i64 @is_digit(i8 signext %34)
%39 = icmp eq i64 %38, 0
br i1 %39, label %47, label %40
40: ; preds = %33
%41 = load i8, i8* %35
%42 = sext i8 %41 to i32
%43 = add nsw i32 %42, -48
%44 = sitofp i32 %43 to double
%45 = fdiv double %44, %37
%46 = fadd double %36, %45
br label %48
47: ; preds = %33
store i32 1, i32* %1
br label %48
48: ; preds = %40, %47
%49 = phi double [ %46, %40 ], [ %36, %47 ]
%50 = getelementptr inbounds i8, i8* %35, i64 1
%51 = load i8, i8* %50
%52 = icmp eq i8 %51, 0
br i1 %52, label %57, label %53
53: ; preds = %48
%54 = fmul double %37, 1.000000e+01
%55 = load i32, i32* %1
%56 = icmp eq i32 %55, 0
br i1 %56, label %33, label %57
57: ; preds = %53, %48
%58 = fpext double %49 to x86_fp80
%59 = fadd x86_fp80 %8, %58
br label %61
60: ; preds = %29
store i32 1, i32* %1
br label %61
61: ; preds = %6, %10, %57, %60, %26
%62 = phi x86_fp80 [ %8, %26 ], [ %59, %57 ], [ %8, %60 ], [ %8, %10 ], [ %8, %6 ]
%63 = load i32, i32* %3
%64 = sitofp i32 %63 to x86_fp80
%65 = fmul x86_fp80 %62, %64
%66 = fptrunc x86_fp80 %65 to double
ret double %66
}