#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 */
struct lconv {
  char *decimal_point;
};

/* Variables and functions */
scalar_t__ ERANGE;
scalar_t__ errno;
int /*<<< orphan*/ ffpmsg(char *);
struct lconv *localeconv();
char *strchr(char const *, char);
int /*<<< orphan*/ strcpy(char *, char const *);
int strlen(char const *);
int /*<<< orphan*/ strncat(char *, char const *, int);
double strtod(char const *, char **);
int ffc2dd(const char *cval, double *dval, int *status) {
  char *loc, msg[81], tval[73];
  struct lconv *lcc = 0;
  static char decimalpt = 0;
  short *sptr, iret;
  if (*status > 0)
    return (*status);
  if (!decimalpt) {
    lcc = localeconv();
    decimalpt = *(lcc->decimal_point);
  }
  errno = 0;
  *dval = 0.;
  if (strchr(cval, 'D') || decimalpt == ',') {
    if (strlen(cval) > 72) {
      strcpy(msg, "Error: Invalid string to double in ffc2dd");
      ffpmsg(msg);
      return (*status = 409);
    }
    strcpy(tval, cval);
    if ((loc = strchr(tval, 'D')))
      *loc = 'E';
    if (decimalpt == ',') {
      if ((loc = strchr(tval, '.')))
        *loc = ',';
    }
    *dval = strtod(tval, &loc);
  } else {
    *dval = strtod(cval, &loc);
  }
  if (*loc != '\0' && *loc != ' ') {
    strcpy(msg, "Error in ffc2dd converting string to double: ");
    strncat(msg, cval, 30);
    ffpmsg(msg);
    *status = 409;
  }
  sptr = (short *)dval;
  sptr += 3;
  iret = ((*sptr & 0x7FF0) == 0x7FF0 ? 1 : (*sptr & 0x7FF0) == 0 ? 2 : 0);
  if (errno == ERANGE || (iret == 1)) {
    strcpy(msg, "Error in ffc2dd converting string to double: ");
    strncat(msg, cval, 30);
    ffpmsg(msg);
    *dval = 0.;
    *status = 412;
    errno = 0;
  }
  return (*status);
}


x86 assembly (clang, -O0):
<ffc2dd>:
push   %rbp
mov    %rsp,%rbp
sub    $0xf0,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
movq   $0x0,-0xd8(%rbp)
mov    -0x20(%rbp),%rax
cmpl   $0x0,(%rax)
jle    11ad <ffc2dd+0x3d>
mov    -0x20(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x4(%rbp)
jmp    144c <ffc2dd+0x2dc>
cmpb   $0x0,0x2eac(%rip)
jne    11da <ffc2dd+0x6a>
mov    $0x0,%al
call   1050 <localeconv@plt>
mov    %rax,-0xd8(%rbp)
mov    -0xd8(%rbp),%rax
mov    (%rax),%rax
mov    (%rax),%al
mov    %al,0x2e86(%rip)
mov    0x2df7(%rip),%rax
movq   $0x0,(%rax)
mov    -0x18(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
mov    -0x10(%rbp),%rdi
mov    $0x44,%esi
call   1080 <strchr@plt>
cmp    $0x0,%rax
jne    121b <ffc2dd+0xab>
movsbl 0x2e4e(%rip),%eax
cmp    $0x2c,%eax
jne    12ea <ffc2dd+0x17a>
mov    -0x10(%rbp),%rdi
call   1060 <strlen@plt>
cmp    $0x48,%eax
jle    125c <ffc2dd+0xec>
lea    -0x80(%rbp),%rdi
lea    0xdc8(%rip),%rsi
call   1030 <strcpy@plt>
lea    -0x80(%rbp),%rdi
call   1070 <ffpmsg@plt>
mov    -0x20(%rbp),%rax
movl   $0x199,(%rax)
movl   $0x199,-0x4(%rbp)
jmp    144c <ffc2dd+0x2dc>
lea    -0xd0(%rbp),%rdi
mov    -0x10(%rbp),%rsi
call   1030 <strcpy@plt>
lea    -0xd0(%rbp),%rdi
mov    $0x44,%esi
call   1080 <strchr@plt>
mov    %rax,-0x28(%rbp)
cmp    $0x0,%rax
je     1292 <ffc2dd+0x122>
mov    -0x28(%rbp),%rax
movb   $0x45,(%rax)
movsbl 0x2dc7(%rip),%eax
cmp    $0x2c,%eax
jne    12cd <ffc2dd+0x15d>
lea    -0xd0(%rbp),%rdi
mov    $0x2e,%esi
call   1080 <strchr@plt>
mov    %rax,-0x28(%rbp)
cmp    $0x0,%rax
je     12c8 <ffc2dd+0x158>
mov    -0x28(%rbp),%rax
movb   $0x2c,(%rax)
jmp    12cd <ffc2dd+0x15d>
lea    -0xd0(%rbp),%rdi
lea    -0x28(%rbp),%rsi
call   1040 <strtod@plt>
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
jmp    12ff <ffc2dd+0x18f>
mov    -0x10(%rbp),%rdi
lea    -0x28(%rbp),%rsi
call   1040 <strtod@plt>
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1354 <ffc2dd+0x1e4>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
je     1354 <ffc2dd+0x1e4>
lea    -0x80(%rbp),%rdi
lea    0xd00(%rip),%rsi
call   1030 <strcpy@plt>
lea    -0x80(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    $0x1e,%edx
call   1090 <strncat@plt>
lea    -0x80(%rbp),%rdi
call   1070 <ffpmsg@plt>
mov    -0x20(%rbp),%rax
movl   $0x199,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,-0xe0(%rbp)
mov    -0xe0(%rbp),%rax
add    $0x6,%rax
mov    %rax,-0xe0(%rbp)
mov    -0xe0(%rbp),%rax
movswl (%rax),%eax
and    $0x7ff0,%eax
cmp    $0x7ff0,%eax
jne    139b <ffc2dd+0x22b>
mov    $0x1,%eax
mov    %eax,-0xe8(%rbp)
jmp    13be <ffc2dd+0x24e>
mov    -0xe0(%rbp),%rax
movswl (%rax),%edx
and    $0x7ff0,%edx
xor    %eax,%eax
mov    $0x2,%ecx
cmp    $0x0,%edx
cmove  %ecx,%eax
mov    %eax,-0xe8(%rbp)
mov    -0xe8(%rbp),%eax
mov    %ax,-0xe2(%rbp)
mov    0x2c06(%rip),%rax
mov    (%rax),%rax
mov    0x2c0c(%rip),%rcx
cmp    (%rcx),%rax
je     13f5 <ffc2dd+0x285>
movswl -0xe2(%rbp),%eax
cmp    $0x1,%eax
jne    1443 <ffc2dd+0x2d3>
lea    -0x80(%rbp),%rdi
lea    0xc2a(%rip),%rsi
call   1030 <strcpy@plt>
lea    -0x80(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    $0x1e,%edx
call   1090 <strncat@plt>
lea    -0x80(%rbp),%rdi
call   1070 <ffpmsg@plt>
mov    -0x18(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
mov    -0x20(%rbp),%rax
movl   $0x19c,(%rax)
mov    0x2b9c(%rip),%rax
movq   $0x0,(%rax)
mov    -0x20(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0xf0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ffc2dd>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0xb8,%rsp
mov    (%rdx),%eax
test   %eax,%eax
jle    1199 <ffc2dd+0x29>
add    $0xb8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %rdx,%rbp
mov    %rsi,%r14
mov    %rdi,%r15
mov    0x2eb8(%rip),%bl
test   %bl,%bl
jne    11be <ffc2dd+0x4e>
xor    %eax,%eax
call   1050 <localeconv@plt>
mov    (%rax),%rax
mov    (%rax),%bl
mov    %bl,0x2ea2(%rip)
mov    0x2e13(%rip),%r13
movq   $0x0,0x0(%r13)
movq   $0x0,(%r14)
mov    %r15,%rdi
mov    $0x44,%esi
call   1080 <strchr@plt>
test   %rax,%rax
jne    11f8 <ffc2dd+0x88>
cmp    $0x2c,%bl
je     11f8 <ffc2dd+0x88>
lea    0x8(%rsp),%rsi
mov    %r15,%rdi
jmp    128b <ffc2dd+0x11b>
mov    %r15,%rdi
call   1060 <strlen@plt>
cmp    $0x49,%eax
jl     1232 <ffc2dd+0xc2>
lea    0xdf4(%rip),%rsi
lea    0x60(%rsp),%r14
mov    %r14,%rdi
call   1030 <strcpy@plt>
mov    %r14,%rdi
call   1070 <ffpmsg@plt>
movl   $0x199,0x0(%rbp)
mov    $0x199,%eax
jmp    1187 <ffc2dd+0x17>
lea    0x10(%rsp),%r12
mov    %r12,%rdi
mov    %r15,%rsi
call   1030 <strcpy@plt>
mov    %r12,%rdi
mov    $0x44,%esi
call   1080 <strchr@plt>
mov    %rax,0x8(%rsp)
test   %rax,%rax
je     125c <ffc2dd+0xec>
movb   $0x45,(%rax)
cmpb   $0x2c,0x2dfd(%rip)
jne    1281 <ffc2dd+0x111>
lea    0x10(%rsp),%rdi
mov    $0x2e,%esi
call   1080 <strchr@plt>
mov    %rax,0x8(%rsp)
test   %rax,%rax
je     1281 <ffc2dd+0x111>
movb   $0x2c,(%rax)
lea    0x10(%rsp),%rdi
lea    0x8(%rsp),%rsi
call   1040 <strtod@plt>
movq   %xmm0,(%r14)
mov    0x8(%rsp),%rax
testb  $0xdf,(%rax)
jne    12aa <ffc2dd+0x13a>
movq   %xmm0,%rax
shr    $0x30,%rax
jmp    12e2 <ffc2dd+0x172>
lea    0xd79(%rip),%rsi
lea    0x60(%rsp),%r12
mov    %r12,%rdi
call   1030 <strcpy@plt>
mov    %r12,%rdi
mov    %r15,%rsi
mov    $0x1e,%edx
call   1090 <strncat@plt>
mov    %r12,%rdi
call   1070 <ffpmsg@plt>
movl   $0x199,0x0(%rbp)
movzwl 0x6(%r14),%eax
mov    0x0(%r13),%rcx
mov    0x2cfb(%rip),%rdx
cmp    (%rdx),%rcx
je     1309 <ffc2dd+0x199>
and    $0x7ff0,%eax
movzwl %ax,%eax
cmp    $0x7ff0,%eax
je     1309 <ffc2dd+0x199>
mov    0x0(%rbp),%eax
jmp    1187 <ffc2dd+0x17>
lea    0xd1a(%rip),%rsi
lea    0x60(%rsp),%r12
mov    %r12,%rdi
call   1030 <strcpy@plt>
mov    %r12,%rdi
mov    %r15,%rsi
mov    $0x1e,%edx
call   1090 <strncat@plt>
mov    %r12,%rdi
call   1070 <ffpmsg@plt>
movq   $0x0,(%r14)
movl   $0x19c,0x0(%rbp)
movq   $0x0,0x0(%r13)
mov    $0x19c,%eax
jmp    1187 <ffc2dd+0x17>

LLVM IR (-O0):
%struct.lconv = type { i8* }
@ffc2dd.decimalpt = internal global i8 0
@errno = global i64 0
@.str = [42 x i8] c"Error: Invalid string to double in ffc2dd\00"
@.str.1 = [46 x i8] c"Error in ffc2dd converting string to double: \00"
@ERANGE = global i64 0
define i32 @ffc2dd(i8* %0, double* %1, i32* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca double*
%7 = alloca i32*
%8 = alloca i8*
%9 = alloca [81 x i8]
%10 = alloca [73 x i8]
%11 = alloca %struct.lconv*
%12 = alloca i16*
%13 = alloca i16
store i8* %0, i8** %5
store double* %1, double** %6
store i32* %2, i32** %7
store %struct.lconv* null, %struct.lconv** %11
%14 = load i32*, i32** %7
%15 = load i32, i32* %14
%16 = icmp sgt i32 %15, 0
br i1 %16, label %17, label %20
17: ; preds = %3
%18 = load i32*, i32** %7
%19 = load i32, i32* %18
store i32 %19, i32* %4
br label %137
20: ; preds = %3
%21 = load i8, i8* @ffc2dd.decimalpt
%22 = icmp ne i8 %21, 0
br i1 %22, label %29, label %23
23: ; preds = %20
%24 = call %struct.lconv* (...) @localeconv()
store %struct.lconv* %24, %struct.lconv** %11
%25 = load %struct.lconv*, %struct.lconv** %11
%26 = getelementptr inbounds %struct.lconv, %struct.lconv* %25, i32 0, i32 0
%27 = load i8*, i8** %26
%28 = load i8, i8* %27
store i8 %28, i8* @ffc2dd.decimalpt
br label %29
29: ; preds = %23, %20
store i64 0, i64* @errno
%30 = load double*, double** %6
store double 0.000000e+00, double* %30
%31 = load i8*, i8** %5
%32 = call i8* @strchr(i8* %31, i8 signext 68)
%33 = icmp ne i8* %32, null
br i1 %33, label %38, label %34
34: ; preds = %29
%35 = load i8, i8* @ffc2dd.decimalpt
%36 = sext i8 %35 to i32
%37 = icmp eq i32 %36, 44
br i1 %37, label %38, label %72
38: ; preds = %34, %29
%39 = load i8*, i8** %5
%40 = call i32 @strlen(i8* %39)
%41 = icmp sgt i32 %40, 72
br i1 %41, label %42, label %48
42: ; preds = %38
%43 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%44 = call i32 @strcpy(i8* %43, i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str, i64 0, i64 0))
%45 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%46 = call i32 @ffpmsg(i8* %45)
%47 = load i32*, i32** %7
store i32 409, i32* %47
store i32 409, i32* %4
br label %137
48: ; preds = %38
%49 = getelementptr inbounds [73 x i8], [73 x i8]* %10, i64 0, i64 0
%50 = load i8*, i8** %5
%51 = call i32 @strcpy(i8* %49, i8* %50)
%52 = getelementptr inbounds [73 x i8], [73 x i8]* %10, i64 0, i64 0
%53 = call i8* @strchr(i8* %52, i8 signext 68)
store i8* %53, i8** %8
%54 = icmp ne i8* %53, null
br i1 %54, label %55, label %57
55: ; preds = %48
%56 = load i8*, i8** %8
store i8 69, i8* %56
br label %57
57: ; preds = %55, %48
%58 = load i8, i8* @ffc2dd.decimalpt
%59 = sext i8 %58 to i32
%60 = icmp eq i32 %59, 44
br i1 %60, label %61, label %68
61: ; preds = %57
%62 = getelementptr inbounds [73 x i8], [73 x i8]* %10, i64 0, i64 0
%63 = call i8* @strchr(i8* %62, i8 signext 46)
store i8* %63, i8** %8
%64 = icmp ne i8* %63, null
br i1 %64, label %65, label %67
65: ; preds = %61
%66 = load i8*, i8** %8
store i8 44, i8* %66
br label %67
67: ; preds = %65, %61
br label %68
68: ; preds = %67, %57
%69 = getelementptr inbounds [73 x i8], [73 x i8]* %10, i64 0, i64 0
%70 = call double @strtod(i8* %69, i8** %8)
%71 = load double*, double** %6
store double %70, double* %71
br label %76
72: ; preds = %34
%73 = load i8*, i8** %5
%74 = call double @strtod(i8* %73, i8** %8)
%75 = load double*, double** %6
store double %74, double* %75
br label %76
76: ; preds = %72, %68
%77 = load i8*, i8** %8
%78 = load i8, i8* %77
%79 = sext i8 %78 to i32
%80 = icmp ne i32 %79, 0
br i1 %80, label %81, label %95
81: ; preds = %76
%82 = load i8*, i8** %8
%83 = load i8, i8* %82
%84 = sext i8 %83 to i32
%85 = icmp ne i32 %84, 32
br i1 %85, label %86, label %95
86: ; preds = %81
%87 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%88 = call i32 @strcpy(i8* %87, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.1, i64 0, i64 0))
%89 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%90 = load i8*, i8** %5
%91 = call i32 @strncat(i8* %89, i8* %90, i32 30)
%92 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%93 = call i32 @ffpmsg(i8* %92)
%94 = load i32*, i32** %7
store i32 409, i32* %94
br label %95
95: ; preds = %86, %81, %76
%96 = load double*, double** %6
%97 = bitcast double* %96 to i16*
store i16* %97, i16** %12
%98 = load i16*, i16** %12
%99 = getelementptr inbounds i16, i16* %98, i64 3
store i16* %99, i16** %12
%100 = load i16*, i16** %12
%101 = load i16, i16* %100
%102 = sext i16 %101 to i32
%103 = and i32 %102, 32752
%104 = icmp eq i32 %103, 32752
br i1 %104, label %105, label %106
105: ; preds = %95
br label %114
106: ; preds = %95
%107 = load i16*, i16** %12
%108 = load i16, i16* %107
%109 = sext i16 %108 to i32
%110 = and i32 %109, 32752
%111 = icmp eq i32 %110, 0
%112 = zext i1 %111 to i64
%113 = select i1 %111, i32 2, i32 0
br label %114
114: ; preds = %106, %105
%115 = phi i32 [ 1, %105 ], [ %113, %106 ]
%116 = trunc i32 %115 to i16
store i16 %116, i16* %13
%117 = load i64, i64* @errno
%118 = load i64, i64* @ERANGE
%119 = icmp eq i64 %117, %118
br i1 %119, label %124, label %120
120: ; preds = %114
%121 = load i16, i16* %13
%122 = sext i16 %121 to i32
%123 = icmp eq i32 %122, 1
br i1 %123, label %124, label %134
124: ; preds = %120, %114
%125 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%126 = call i32 @strcpy(i8* %125, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.1, i64 0, i64 0))
%127 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%128 = load i8*, i8** %5
%129 = call i32 @strncat(i8* %127, i8* %128, i32 30)
%130 = getelementptr inbounds [81 x i8], [81 x i8]* %9, i64 0, i64 0
%131 = call i32 @ffpmsg(i8* %130)
%132 = load double*, double** %6
store double 0.000000e+00, double* %132
%133 = load i32*, i32** %7
store i32 412, i32* %133
store i64 0, i64* @errno
br label %134
134: ; preds = %124, %120
%135 = load i32*, i32** %7
%136 = load i32, i32* %135
store i32 %136, i32* %4
br label %137
137: ; preds = %134, %42, %17
%138 = load i32, i32* %4
ret i32 %138
}

LLVM IR (-O2):
%struct.lconv = type { i8* }
@ffc2dd.decimalpt = internal unnamed_addr global i8 0
@errno = global i64 0
@.str = [42 x i8] c"Error: Invalid string to double in ffc2dd\00"
@.str.1 = [46 x i8] c"Error in ffc2dd converting string to double: \00"
@ERANGE = global i64 0
define i32 @ffc2dd(i8* %0, double* nocapture %1, i32* nocapture %2) {
%4 = alloca i8*
%5 = alloca [81 x i8]
%6 = alloca [73 x i8]
%7 = bitcast i8** %4 to i8*
%8 = getelementptr inbounds [81 x i8], [81 x i8]* %5, i64 0, i64 0
%9 = getelementptr inbounds [73 x i8], [73 x i8]* %6, i64 0, i64 0
%10 = load i32, i32* %2
%11 = icmp sgt i32 %10, 0
br i1 %11, label %76, label %12
12: ; preds = %3
%13 = load i8, i8* @ffc2dd.decimalpt
%14 = icmp eq i8 %13, 0
br i1 %14, label %15, label %20
15: ; preds = %12
%16 = tail call %struct.lconv* (...) @localeconv()
%17 = getelementptr inbounds %struct.lconv, %struct.lconv* %16, i64 0, i32 0
%18 = load i8*, i8** %17
%19 = load i8, i8* %18
store i8 %19, i8* @ffc2dd.decimalpt
br label %20
20: ; preds = %15, %12
%21 = phi i8 [ %19, %15 ], [ %13, %12 ]
store i64 0, i64* @errno
store double 0.000000e+00, double* %1
%22 = tail call i8* @strchr(i8* dereferenceable(1) %0, i8 signext 68)
%23 = icmp ne i8* %22, null
%24 = icmp eq i8 %21, 44
%25 = select i1 %23, i1 true, i1 %24
br i1 %25, label %26, label %46
26: ; preds = %20
%27 = tail call i32 @strlen(i8* %0)
%28 = icmp sgt i32 %27, 72
br i1 %28, label %29, label %32
29: ; preds = %26
%30 = call i32 @strcpy(i8* %8, i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str, i64 0, i64 0))
%31 = call i32 @ffpmsg(i8* %8)
store i32 409, i32* %2
br label %76
32: ; preds = %26
%33 = call i32 @strcpy(i8* %9, i8* %0)
%34 = call i8* @strchr(i8* %9, i8 signext 68)
store i8* %34, i8** %4
%35 = icmp eq i8* %34, null
br i1 %35, label %37, label %36
36: ; preds = %32
store i8 69, i8* %34
br label %37
37: ; preds = %36, %32
%38 = load i8, i8* @ffc2dd.decimalpt
%39 = icmp eq i8 %38, 44
br i1 %39, label %40, label %44
40: ; preds = %37
%41 = call i8* @strchr(i8* %9, i8 signext 46)
store i8* %41, i8** %4
%42 = icmp eq i8* %41, null
br i1 %42, label %44, label %43
43: ; preds = %40
store i8 44, i8* %41
br label %44
44: ; preds = %40, %43, %37
%45 = call double @strtod(i8* %9, i8** %4)
br label %48
46: ; preds = %20
%47 = call double @strtod(i8* %0, i8** %4)
br label %48
48: ; preds = %46, %44
%49 = phi double [ %47, %46 ], [ %45, %44 ]
store double %49, double* %1
%50 = load i8*, i8** %4
%51 = load i8, i8* %50
%52 = bitcast double %49 to i64
%53 = lshr i64 %52, 48
%54 = trunc i64 %53 to i16
switch i8 %51, label %55 [
i8 0, label %62
i8 32, label %62
]
55: ; preds = %48
%56 = call i32 @strcpy(i8* %8, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.1, i64 0, i64 0))
%57 = call i32 @strncat(i8* %8, i8* %0, i32 30)
%58 = call i32 @ffpmsg(i8* %8)
store i32 409, i32* %2
%59 = bitcast double* %1 to i16*
%60 = getelementptr inbounds i16, i16* %59, i64 3
%61 = load i16, i16* %60
br label %62
62: ; preds = %48, %48, %55
%63 = phi i16 [ %54, %48 ], [ %54, %48 ], [ %61, %55 ]
%64 = and i16 %63, 32752
%65 = icmp eq i16 %64, 32752
%66 = load i64, i64* @errno
%67 = load i64, i64* @ERANGE
%68 = icmp eq i64 %66, %67
%69 = select i1 %68, i1 true, i1 %65
br i1 %69, label %72, label %70
70: ; preds = %62
%71 = load i32, i32* %2
br label %76
72: ; preds = %62
%73 = call i32 @strcpy(i8* %8, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.1, i64 0, i64 0))
%74 = call i32 @strncat(i8* %8, i8* %0, i32 30)
%75 = call i32 @ffpmsg(i8* %8)
store double 0.000000e+00, double* %1
store i32 412, i32* %2
store i64 0, i64* @errno
br label %76
76: ; preds = %72, %70, %3, %29
%77 = phi i32 [ 409, %29 ], [ %10, %3 ], [ %71, %70 ], [ 412, %72 ]
ret i32 %77
}