#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 */
scalar_t__ isDigit(char);
double small_atoll(char *);
char *strchr(char *, char);
int /*<<< orphan*/ strncpy(char *, char const *, int);
double small_atof(const char *s) {
  char buf[24];
  strncpy(buf, s, 23);
  char *ptr = buf;
  while (*ptr) {
    if (isDigit(*ptr) || *ptr == '-')
      break;
    ptr++;
  }
  if (!*ptr)
    return 0;
  int negative = *ptr == '-';
  if (negative)
    ++ptr;
  char *dot = strchr(ptr, '.');
  if (!dot)
    dot = strchr(ptr, ',');
  if (!dot)
    return negative ? -small_atoll(ptr) : small_atoll(ptr);
  *dot++ = 0;
  double res = small_atoll(dot);
  while (isDigit(*dot)) {
    res /= 10;
    ++dot;
  }
  res += small_atoll(ptr);
  return negative ? -res : res;
}


x86 assembly (clang, -O0):
<small_atof>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x10(%rbp)
lea    -0x30(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    $0x17,%edx
call   1030 <strncpy@plt>
lea    -0x30(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmpb   $0x0,(%rax)
je     11af <small_atof+0x6f>
mov    -0x38(%rbp),%rax
movsbl (%rax),%edi
call   1060 <isDigit@plt>
cmp    $0x0,%rax
jne    1199 <small_atof+0x59>
mov    -0x38(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
jne    119e <small_atof+0x5e>
jmp    11af <small_atof+0x6f>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1166 <small_atof+0x26>
mov    -0x38(%rbp),%rax
cmpb   $0x0,(%rax)
jne    11c9 <small_atof+0x89>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1333 <small_atof+0x1f3>
mov    -0x38(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
sete   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x3c(%rbp)
cmpl   $0x0,-0x3c(%rbp)
je     11f4 <small_atof+0xb4>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rdi
mov    $0x2e,%esi
call   1040 <strchr@plt>
mov    %rax,-0x48(%rbp)
cmpq   $0x0,-0x48(%rbp)
jne    1223 <small_atof+0xe3>
mov    -0x38(%rbp),%rdi
mov    $0x2c,%esi
call   1040 <strchr@plt>
mov    %rax,-0x48(%rbp)
cmpq   $0x0,-0x48(%rbp)
jne    127f <small_atof+0x13f>
cmpl   $0x0,-0x3c(%rbp)
je     1262 <small_atof+0x122>
mov    -0x38(%rbp),%rdi
call   1050 <small_atoll@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x58(%rbp)
jmp    1270 <small_atof+0x130>
mov    -0x38(%rbp),%rdi
call   1050 <small_atoll@plt>
movsd  %xmm0,-0x58(%rbp)
movsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1333 <small_atof+0x1f3>
mov    -0x48(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x48(%rbp)
movb   $0x0,(%rax)
mov    -0x48(%rbp),%rdi
call   1050 <small_atoll@plt>
movsd  %xmm0,-0x50(%rbp)
mov    -0x48(%rbp),%rax
movsbl (%rax),%edi
call   1060 <isDigit@plt>
cmp    $0x0,%rax
je     12dc <small_atof+0x19c>
movsd  -0x50(%rbp),%xmm0
movsd  0xd3e(%rip),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    129f <small_atof+0x15f>
mov    -0x38(%rbp),%rdi
call   1050 <small_atoll@plt>
addsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
cmpl   $0x0,-0x3c(%rbp)
je     131f <small_atof+0x1df>
movsd  -0x50(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x60(%rbp)
jmp    1329 <small_atof+0x1e9>
movsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<small_atof>:
push   %rbp
push   %r14
push   %rbx
sub    $0x30,%rsp
mov    %rdi,%rsi
lea    0x10(%rsp),%r14
mov    %r14,%rdi
mov    $0x17,%edx
call   1030 <strncpy@plt>
mov    0x10(%rsp),%al
xorpd  %xmm0,%xmm0
test   %al,%al
je     1251 <small_atof+0x111>
nopl   (%rax)
movsbl %al,%edi
call   1060 <isDigit@plt>
movzbl (%r14),%ebp
test   %rax,%rax
jne    119d <small_atof+0x5d>
cmp    $0x2d,%bpl
xorpd  %xmm0,%xmm0
je     11ab <small_atof+0x6b>
movzbl 0x1(%r14),%eax
add    $0x1,%r14
test   %al,%al
jne    1170 <small_atof+0x30>
jmp    1251 <small_atof+0x111>
test   %bpl,%bpl
xorpd  %xmm0,%xmm0
jne    11ae <small_atof+0x6e>
jmp    1251 <small_atof+0x111>
mov    $0x2d,%bpl
xor    %eax,%eax
cmp    $0x2d,%bpl
sete   %al
add    %rax,%r14
mov    %r14,%rdi
mov    $0x2e,%esi
call   1040 <strchr@plt>
mov    %rax,%rbx
test   %rax,%rax
jne    11e4 <small_atof+0xa4>
mov    %r14,%rdi
mov    $0x2c,%esi
call   1040 <strchr@plt>
mov    %rax,%rbx
test   %rax,%rax
je     125a <small_atof+0x11a>
lea    0x1(%rbx),%rdi
movb   $0x0,(%rbx)
call   1050 <small_atoll@plt>
movsd  %xmm0,0x8(%rsp)
movsbl 0x1(%rbx),%edi
call   1060 <isDigit@plt>
test   %rax,%rax
je     1235 <small_atof+0xf5>
add    $0x2,%rbx
nopl   0x0(%rax,%rax,1)
movsd  0x8(%rsp),%xmm0
divsd  0xde2(%rip),%xmm0
movsd  %xmm0,0x8(%rsp)
movsbl (%rbx),%edi
call   1060 <isDigit@plt>
add    $0x1,%rbx
test   %rax,%rax
jne    1210 <small_atof+0xd0>
mov    %r14,%rdi
call   1050 <small_atoll@plt>
addsd  0x8(%rsp),%xmm0
cmp    $0x2d,%bpl
jne    1251 <small_atof+0x111>
xorpd  0xdbf(%rip),%xmm0
add    $0x30,%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret
mov    %r14,%rdi
call   1050 <small_atoll@plt>
cmp    $0x2d,%bpl
je     1249 <small_atof+0x109>
jmp    1251 <small_atof+0x111>

LLVM IR (-O0):
define double @small_atof(i8* %0) {
%2 = alloca double
%3 = alloca i8*
%4 = alloca [24 x i8]
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i8*
%8 = alloca double
store i8* %0, i8** %3
%9 = getelementptr inbounds [24 x i8], [24 x i8]* %4, i64 0, i64 0
%10 = load i8*, i8** %3
%11 = call i32 @strncpy(i8* %9, i8* %10, i32 23)
%12 = getelementptr inbounds [24 x i8], [24 x i8]* %4, i64 0, i64 0
store i8* %12, i8** %5
br label %13
13: ; preds = %28, %1
%14 = load i8*, i8** %5
%15 = load i8, i8* %14
%16 = icmp ne i8 %15, 0
br i1 %16, label %17, label %31
17: ; preds = %13
%18 = load i8*, i8** %5
%19 = load i8, i8* %18
%20 = call i64 @isDigit(i8 signext %19)
%21 = icmp ne i64 %20, 0
br i1 %21, label %27, label %22
22: ; preds = %17
%23 = load i8*, i8** %5
%24 = load i8, i8* %23
%25 = sext i8 %24 to i32
%26 = icmp eq i32 %25, 45
br i1 %26, label %27, label %28
27: ; preds = %22, %17
br label %31
28: ; preds = %22
%29 = load i8*, i8** %5
%30 = getelementptr inbounds i8, i8* %29, i32 1
store i8* %30, i8** %5
br label %13
31: ; preds = %27, %13
%32 = load i8*, i8** %5
%33 = load i8, i8* %32
%34 = icmp ne i8 %33, 0
br i1 %34, label %36, label %35
35: ; preds = %31
store double 0.000000e+00, double* %2
br label %99
36: ; preds = %31
%37 = load i8*, i8** %5
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
%40 = icmp eq i32 %39, 45
%41 = zext i1 %40 to i32
store i32 %41, i32* %6
%42 = load i32, i32* %6
%43 = icmp ne i32 %42, 0
br i1 %43, label %44, label %47
44: ; preds = %36
%45 = load i8*, i8** %5
%46 = getelementptr inbounds i8, i8* %45, i32 1
store i8* %46, i8** %5
br label %47
47: ; preds = %44, %36
%48 = load i8*, i8** %5
%49 = call i8* @strchr(i8* %48, i8 signext 46)
store i8* %49, i8** %7
%50 = load i8*, i8** %7
%51 = icmp ne i8* %50, null
br i1 %51, label %55, label %52
52: ; preds = %47
%53 = load i8*, i8** %5
%54 = call i8* @strchr(i8* %53, i8 signext 44)
store i8* %54, i8** %7
br label %55
55: ; preds = %52, %47
%56 = load i8*, i8** %7
%57 = icmp ne i8* %56, null
br i1 %57, label %70, label %58
58: ; preds = %55
%59 = load i32, i32* %6
%60 = icmp ne i32 %59, 0
br i1 %60, label %61, label %65
61: ; preds = %58
%62 = load i8*, i8** %5
%63 = call double @small_atoll(i8* %62)
%64 = fneg double %63
br label %68
65: ; preds = %58
%66 = load i8*, i8** %5
%67 = call double @small_atoll(i8* %66)
br label %68
68: ; preds = %65, %61
%69 = phi double [ %64, %61 ], [ %67, %65 ]
store double %69, double* %2
br label %99
70: ; preds = %55
%71 = load i8*, i8** %7
%72 = getelementptr inbounds i8, i8* %71, i32 1
store i8* %72, i8** %7
store i8 0, i8* %71
%73 = load i8*, i8** %7
%74 = call double @small_atoll(i8* %73)
store double %74, double* %8
br label %75
75: ; preds = %80, %70
%76 = load i8*, i8** %7
%77 = load i8, i8* %76
%78 = call i64 @isDigit(i8 signext %77)
%79 = icmp ne i64 %78, 0
br i1 %79, label %80, label %85
80: ; preds = %75
%81 = load double, double* %8
%82 = fdiv double %81, 1.000000e+01
store double %82, double* %8
%83 = load i8*, i8** %7
%84 = getelementptr inbounds i8, i8* %83, i32 1
store i8* %84, i8** %7
br label %75
85: ; preds = %75
%86 = load i8*, i8** %5
%87 = call double @small_atoll(i8* %86)
%88 = load double, double* %8
%89 = fadd double %88, %87
store double %89, double* %8
%90 = load i32, i32* %6
%91 = icmp ne i32 %90, 0
br i1 %91, label %92, label %95
92: ; preds = %85
%93 = load double, double* %8
%94 = fneg double %93
br label %97
95: ; preds = %85
%96 = load double, double* %8
br label %97
97: ; preds = %95, %92
%98 = phi double [ %94, %92 ], [ %96, %95 ]
store double %98, double* %2
br label %99
99: ; preds = %97, %68, %35
%100 = load double, double* %2
ret double %100
}

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