#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 */
unsigned int SHRT_MAX;
short SHRT_MIN;
int ffuintfi2(unsigned int *input, long ntodo, double scale, double zero,
              short *output, int *status) {
  long ii;
  double dvalue;
  if (scale == 1. && zero == 0.) {
    for (ii = 0; ii < ntodo; ii++) {
      if (input[ii] > SHRT_MAX) {
        *status = -11;
        output[ii] = SHRT_MAX;
      } else
        output[ii] = input[ii];
    }
  } else {
    for (ii = 0; ii < ntodo; ii++) {
      dvalue = (input[ii] - zero) / scale;
      if (dvalue < -32768.49) {
        *status = -11;
        output[ii] = SHRT_MIN;
      } else if (dvalue > 32767.49) {
        *status = -11;
        output[ii] = SHRT_MAX;
      } else {
        if (dvalue >= 0)
          output[ii] = (short)(dvalue + .5);
        else
          output[ii] = (short)(dvalue - .5);
      }
    }
  }
  return (*status);
}


x86 assembly (clang, -O0):
<ffuintfi2>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
movsd  %xmm1,-0x20(%rbp)
mov    %rdx,-0x28(%rbp)
mov    %rcx,-0x30(%rbp)
movsd  -0x18(%rbp),%xmm0
movsd  0xed5(%rip),%xmm1
ucomisd %xmm1,%xmm0
jne    11df <ffuintfi2+0xdf>
jp     11df <ffuintfi2+0xdf>
movsd  -0x20(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    11df <ffuintfi2+0xdf>
jp     11df <ffuintfi2+0xdf>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    11da <ffuintfi2+0xda>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    0x2e5d(%rip),%rcx
cmp    (%rcx),%eax
jbe    11aa <ffuintfi2+0xaa>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    0x2e44(%rip),%rax
mov    (%rax),%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    11c4 <ffuintfi2+0xc4>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    11c9 <ffuintfi2+0xc9>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    115b <ffuintfi2+0x5b>
jmp    130e <ffuintfi2+0x20e>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1309 <ffuintfi2+0x209>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
cvtsi2sd %rax,%xmm0
subsd  -0x20(%rbp),%xmm0
divsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xdec(%rip),%xmm0
ucomisd -0x40(%rbp),%xmm0
jbe    124c <ffuintfi2+0x14c>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    0x2da8(%rip),%rax
mov    (%rax),%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    12f3 <ffuintfi2+0x1f3>
movsd  -0x40(%rbp),%xmm0
movsd  0xdb7(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    128a <ffuintfi2+0x18a>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    0x2d64(%rip),%rax
mov    (%rax),%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    12ee <ffuintfi2+0x1ee>
movsd  -0x40(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     12c5 <ffuintfi2+0x1c5>
movsd  -0x40(%rbp),%xmm0
movsd  0xd77(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    12e9 <ffuintfi2+0x1e9>
movsd  -0x40(%rbp),%xmm0
movsd  0xd46(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %ax,%dx
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
jmp    12ee <ffuintfi2+0x1ee>
jmp    12f3 <ffuintfi2+0x1f3>
jmp    12f8 <ffuintfi2+0x1f8>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11e7 <ffuintfi2+0xe7>
jmp    130e <ffuintfi2+0x20e>
mov    -0x30(%rbp),%rax
mov    (%rax),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ffuintfi2>:
ucomisd 0xef8(%rip),%xmm0
jne    1154 <ffuintfi2+0x54>
jp     1154 <ffuintfi2+0x54>
xorpd  %xmm2,%xmm2
ucomisd %xmm2,%xmm1
jne    1154 <ffuintfi2+0x54>
jp     1154 <ffuintfi2+0x54>
test   %rsi,%rsi
jle    1207 <ffuintfi2+0x107>
cmp    $0x1,%rsi
jne    120a <ffuintfi2+0x10a>
xor    %eax,%eax
test   $0x1,%sil
je     1207 <ffuintfi2+0x107>
mov    (%rdi,%rax,4),%esi
mov    0x2e97(%rip),%rdi
cmp    (%rdi),%esi
jbe    114d <ffuintfi2+0x4d>
movl   $0xfffffff5,(%rcx)
mov    (%rdi),%esi
mov    %si,(%rdx,%rax,2)
mov    (%rcx),%eax
ret
test   %rsi,%rsi
jle    1207 <ffuintfi2+0x107>
xor    %r11d,%r11d
movsd  0xea0(%rip),%xmm2
mov    0x2e71(%rip),%r8
movsd  0xe99(%rip),%xmm3
mov    0x2e5a(%rip),%r9
xorpd  %xmm4,%xmm4
movsd  0xe96(%rip),%xmm5
movsd  0xe86(%rip),%xmm6
jmp    11b8 <ffuintfi2+0xb8>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movl   $0xfffffff5,(%rcx)
movzwl (%r8),%r10d
mov    %r10w,(%rdx,%r11,2)
add    $0x1,%r11
cmp    %r11,%rsi
je     1207 <ffuintfi2+0x107>
mov    (%rdi,%r11,4),%eax
xorps  %xmm7,%xmm7
cvtsi2sd %rax,%xmm7
subsd  %xmm1,%xmm7
divsd  %xmm0,%xmm7
ucomisd %xmm7,%xmm2
ja     11a0 <ffuintfi2+0xa0>
ucomisd %xmm3,%xmm7
jbe    11f0 <ffuintfi2+0xf0>
movl   $0xfffffff5,(%rcx)
movzwl (%r9),%r10d
jmp    11aa <ffuintfi2+0xaa>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
ucomisd %xmm4,%xmm7
jae    11fc <ffuintfi2+0xfc>
addsd  %xmm5,%xmm7
jmp    1200 <ffuintfi2+0x100>
addsd  %xmm6,%xmm7
cvttsd2si %xmm7,%r10d
jmp    11aa <ffuintfi2+0xaa>
mov    (%rcx),%eax
ret
mov    %rsi,%r8
and    $0xfffffffffffffffe,%r8
xor    %eax,%eax
mov    0x2dbe(%rip),%r9
jmp    1233 <ffuintfi2+0x133>
nopl   0x0(%rax)
mov    %r10w,0x2(%rdx,%rax,2)
add    $0x2,%rax
cmp    %rax,%r8
je     112d <ffuintfi2+0x2d>
mov    (%rdi,%rax,4),%r10d
cmp    (%r9),%r10d
jbe    1245 <ffuintfi2+0x145>
movl   $0xfffffff5,(%rcx)
mov    (%r9),%r10d
mov    %r10w,(%rdx,%rax,2)
mov    0x4(%rdi,%rax,4),%r10d
cmp    (%r9),%r10d
jbe    1220 <ffuintfi2+0x120>
movl   $0xfffffff5,(%rcx)
mov    (%r9),%r10d
jmp    1220 <ffuintfi2+0x120>

LLVM IR (-O0):
@SHRT_MAX = global i32 0
@SHRT_MIN = global i16 0
define i32 @ffuintfi2(i32* %0, i64 %1, double %2, double %3, i16* %4, i32* %5) {
%7 = alloca i32*
%8 = alloca i64
%9 = alloca double
%10 = alloca double
%11 = alloca i16*
%12 = alloca i32*
%13 = alloca i64
%14 = alloca double
store i32* %0, i32** %7
store i64 %1, i64* %8
store double %2, double* %9
store double %3, double* %10
store i16* %4, i16** %11
store i32* %5, i32** %12
%15 = load double, double* %9
%16 = fcmp oeq double %15, 1.000000e+00
br i1 %16, label %17, label %53
17: ; preds = %6
%18 = load double, double* %10
%19 = fcmp oeq double %18, 0.000000e+00
br i1 %19, label %20, label %53
20: ; preds = %17
store i64 0, i64* %13
br label %21
21: ; preds = %49, %20
%22 = load i64, i64* %13
%23 = load i64, i64* %8
%24 = icmp slt i64 %22, %23
br i1 %24, label %25, label %52
25: ; preds = %21
%26 = load i32*, i32** %7
%27 = load i64, i64* %13
%28 = getelementptr inbounds i32, i32* %26, i64 %27
%29 = load i32, i32* %28
%30 = load i32, i32* @SHRT_MAX
%31 = icmp ugt i32 %29, %30
br i1 %31, label %32, label %39
32: ; preds = %25
%33 = load i32*, i32** %12
store i32 -11, i32* %33
%34 = load i32, i32* @SHRT_MAX
%35 = trunc i32 %34 to i16
%36 = load i16*, i16** %11
%37 = load i64, i64* %13
%38 = getelementptr inbounds i16, i16* %36, i64 %37
store i16 %35, i16* %38
br label %48
39: ; preds = %25
%40 = load i32*, i32** %7
%41 = load i64, i64* %13
%42 = getelementptr inbounds i32, i32* %40, i64 %41
%43 = load i32, i32* %42
%44 = trunc i32 %43 to i16
%45 = load i16*, i16** %11
%46 = load i64, i64* %13
%47 = getelementptr inbounds i16, i16* %45, i64 %46
store i16 %44, i16* %47
br label %48
48: ; preds = %39, %32
br label %49
49: ; preds = %48
%50 = load i64, i64* %13
%51 = add nsw i64 %50, 1
store i64 %51, i64* %13
br label %21
52: ; preds = %21
br label %110
53: ; preds = %17, %6
store i64 0, i64* %13
br label %54
54: ; preds = %106, %53
%55 = load i64, i64* %13
%56 = load i64, i64* %8
%57 = icmp slt i64 %55, %56
br i1 %57, label %58, label %109
58: ; preds = %54
%59 = load i32*, i32** %7
%60 = load i64, i64* %13
%61 = getelementptr inbounds i32, i32* %59, i64 %60
%62 = load i32, i32* %61
%63 = uitofp i32 %62 to double
%64 = load double, double* %10
%65 = fsub double %63, %64
%66 = load double, double* %9
%67 = fdiv double %65, %66
store double %67, double* %14
%68 = load double, double* %14
%69 = fcmp olt double %68, 0xC0E0000FAE147AE1
br i1 %69, label %70, label %76
70: ; preds = %58
%71 = load i32*, i32** %12
store i32 -11, i32* %71
%72 = load i16, i16* @SHRT_MIN
%73 = load i16*, i16** %11
%74 = load i64, i64* %13
%75 = getelementptr inbounds i16, i16* %73, i64 %74
store i16 %72, i16* %75
br label %105
76: ; preds = %58
%77 = load double, double* %14
%78 = fcmp ogt double %77, 0x40DFFFDF5C28F5C3
br i1 %78, label %79, label %86
79: ; preds = %76
%80 = load i32*, i32** %12
store i32 -11, i32* %80
%81 = load i32, i32* @SHRT_MAX
%82 = trunc i32 %81 to i16
%83 = load i16*, i16** %11
%84 = load i64, i64* %13
%85 = getelementptr inbounds i16, i16* %83, i64 %84
store i16 %82, i16* %85
br label %104
86: ; preds = %76
%87 = load double, double* %14
%88 = fcmp oge double %87, 0.000000e+00
br i1 %88, label %89, label %96
89: ; preds = %86
%90 = load double, double* %14
%91 = fadd double %90, 5.000000e-01
%92 = fptosi double %91 to i16
%93 = load i16*, i16** %11
%94 = load i64, i64* %13
%95 = getelementptr inbounds i16, i16* %93, i64 %94
store i16 %92, i16* %95
br label %103
96: ; preds = %86
%97 = load double, double* %14
%98 = fsub double %97, 5.000000e-01
%99 = fptosi double %98 to i16
%100 = load i16*, i16** %11
%101 = load i64, i64* %13
%102 = getelementptr inbounds i16, i16* %100, i64 %101
store i16 %99, i16* %102
br label %103
103: ; preds = %96, %89
br label %104
104: ; preds = %103, %79
br label %105
105: ; preds = %104, %70
br label %106
106: ; preds = %105
%107 = load i64, i64* %13
%108 = add nsw i64 %107, 1
store i64 %108, i64* %13
br label %54
109: ; preds = %54
br label %110
110: ; preds = %109, %52
%111 = load i32*, i32** %12
%112 = load i32, i32* %111
ret i32 %112
}

LLVM IR (-O2):
@SHRT_MAX = global i32 0
@SHRT_MIN = global i16 0
define i32 @ffuintfi2(i32* nocapture %0, i64 %1, double %2, double %3, i16* nocapture writeonly %4, i32* nocapture %5) {
%7 = fcmp oeq double %2, 1.000000e+00
%8 = fcmp oeq double %3, 0.000000e+00
%9 = and i1 %7, %8
%10 = icmp sgt i64 %1, 0
br i1 %9, label %12, label %11
11: ; preds = %6
br i1 %10, label %45, label %87
12: ; preds = %6
br i1 %10, label %13, label %87
13: ; preds = %12
%14 = and i64 %1, 1
%15 = icmp eq i64 %1, 1
br i1 %15, label %73, label %16
16: ; preds = %13
%17 = and i64 %1, -2
br label %18
18: ; preds = %38, %16
%19 = phi i64 [ 0, %16 ], [ %42, %38 ]
%20 = phi i64 [ 0, %16 ], [ %43, %38 ]
%21 = getelementptr inbounds i32, i32* %0, i64 %19
%22 = load i32, i32* %21
%23 = load i32, i32* @SHRT_MAX
%24 = icmp ugt i32 %22, %23
br i1 %24, label %25, label %27
25: ; preds = %18
store i32 -11, i32* %5
%26 = load i32, i32* @SHRT_MAX
br label %27
27: ; preds = %18, %25
%28 = phi i32 [ %26, %25 ], [ %22, %18 ]
%29 = trunc i32 %28 to i16
%30 = getelementptr inbounds i16, i16* %4, i64 %19
store i16 %29, i16* %30
%31 = or i64 %19, 1
%32 = getelementptr inbounds i32, i32* %0, i64 %31
%33 = load i32, i32* %32
%34 = load i32, i32* @SHRT_MAX
%35 = icmp ugt i32 %33, %34
br i1 %35, label %36, label %38
36: ; preds = %27
store i32 -11, i32* %5
%37 = load i32, i32* @SHRT_MAX
br label %38
38: ; preds = %36, %27
%39 = phi i32 [ %37, %36 ], [ %33, %27 ]
%40 = trunc i32 %39 to i16
%41 = getelementptr inbounds i16, i16* %4, i64 %31
store i16 %40, i16* %41
%42 = add nuw nsw i64 %19, 2
%43 = add i64 %20, 2
%44 = icmp eq i64 %43, %17
br i1 %44, label %73, label %18
45: ; preds = %11, %68
%46 = phi i64 [ %71, %68 ], [ 0, %11 ]
%47 = getelementptr inbounds i32, i32* %0, i64 %46
%48 = load i32, i32* %47
%49 = uitofp i32 %48 to double
%50 = fsub double %49, %3
%51 = fdiv double %50, %2
%52 = fcmp olt double %51, 0xC0E0000FAE147AE1
br i1 %52, label %53, label %55
53: ; preds = %45
store i32 -11, i32* %5
%54 = load i16, i16* @SHRT_MIN
br label %68
55: ; preds = %45
%56 = fcmp ogt double %51, 0x40DFFFDF5C28F5C3
br i1 %56, label %57, label %60
57: ; preds = %55
store i32 -11, i32* %5
%58 = load i32, i32* @SHRT_MAX
%59 = trunc i32 %58 to i16
br label %68
60: ; preds = %55
%61 = fcmp ult double %51, 0.000000e+00
br i1 %61, label %65, label %62
62: ; preds = %60
%63 = fadd double %51, 5.000000e-01
%64 = fptosi double %63 to i16
br label %68
65: ; preds = %60
%66 = fadd double %51, -5.000000e-01
%67 = fptosi double %66 to i16
br label %68
68: ; preds = %53, %62, %65, %57
%69 = phi i16 [ %54, %53 ], [ %64, %62 ], [ %67, %65 ], [ %59, %57 ]
%70 = getelementptr inbounds i16, i16* %4, i64 %46
store i16 %69, i16* %70
%71 = add nuw nsw i64 %46, 1
%72 = icmp eq i64 %71, %1
br i1 %72, label %87, label %45
73: ; preds = %38, %13
%74 = phi i64 [ 0, %13 ], [ %42, %38 ]
%75 = icmp eq i64 %14, 0
br i1 %75, label %87, label %76
76: ; preds = %73
%77 = getelementptr inbounds i32, i32* %0, i64 %74
%78 = load i32, i32* %77
%79 = load i32, i32* @SHRT_MAX
%80 = icmp ugt i32 %78, %79
br i1 %80, label %81, label %83
81: ; preds = %76
store i32 -11, i32* %5
%82 = load i32, i32* @SHRT_MAX
br label %83
83: ; preds = %81, %76
%84 = phi i32 [ %82, %81 ], [ %78, %76 ]
%85 = trunc i32 %84 to i16
%86 = getelementptr inbounds i16, i16* %4, i64 %74
store i16 %85, i16* %86
br label %87
87: ; preds = %68, %83, %73, %11, %12
%88 = load i32, i32* %5
ret i32 %88
}