#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 */
long UCHAR_MAX;
int ffi4fi1(long *input, long ntodo, double scale, double zero,
            unsigned char *output, int *status) {
  long ii;
  double dvalue;
  if (scale == 1. && zero == 0.) {
    for (ii = 0; ii < ntodo; ii++) {
      if (input[ii] < 0) {
        *status = -11;
        output[ii] = 0;
      } else if (input[ii] > UCHAR_MAX) {
        *status = -11;
        output[ii] = UCHAR_MAX;
      } else
        output[ii] = input[ii];
    }
  } else {
    for (ii = 0; ii < ntodo; ii++) {
      dvalue = (input[ii] - zero) / scale;
      if (dvalue < -0.49) {
        *status = -11;
        output[ii] = 0;
      } else if (dvalue > 255.49) {
        *status = -11;
        output[ii] = UCHAR_MAX;
      } else
        output[ii] = (unsigned char)(dvalue + .5);
    }
  }
  return (*status);
}


x86 assembly (clang, -O0):
<ffi4fi1>:
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    1212 <ffi4fi1+0x112>
jp     1212 <ffi4fi1+0x112>
movsd  -0x20(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1212 <ffi4fi1+0x112>
jp     1212 <ffi4fi1+0x112>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    120d <ffi4fi1+0x10d>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
jge    1197 <ffi4fi1+0x97>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
jmp    11f7 <ffi4fi1+0xf7>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    0x2e46(%rip),%rcx
cmp    (%rcx),%rax
jle    11d9 <ffi4fi1+0xd9>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    0x2e2c(%rip),%rax
mov    (%rax),%rax
mov    %al,%dl
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    11f2 <ffi4fi1+0xf2>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %al,%dl
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    11f7 <ffi4fi1+0xf7>
jmp    11fc <ffi4fi1+0xfc>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    115b <ffi4fi1+0x5b>
jmp    12f2 <ffi4fi1+0x1f2>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    12ed <ffi4fi1+0x1ed>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
cvtsi2sdq (%rax,%rcx,8),%xmm0
subsd  -0x20(%rbp),%xmm0
divsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xdbb(%rip),%xmm0
ucomisd -0x40(%rbp),%xmm0
jbe    1273 <ffi4fi1+0x173>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
jmp    12d7 <ffi4fi1+0x1d7>
movsd  -0x40(%rbp),%xmm0
movsd  0xd90(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    12b0 <ffi4fi1+0x1b0>
mov    -0x30(%rbp),%rax
movl   $0xfffffff5,(%rax)
mov    0x2d55(%rip),%rax
mov    (%rax),%rax
mov    %al,%dl
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    12d2 <ffi4fi1+0x1d2>
movsd  -0x40(%rbp),%xmm0
movsd  0xd5b(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %al,%dl
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    12d7 <ffi4fi1+0x1d7>
jmp    12dc <ffi4fi1+0x1dc>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    121a <ffi4fi1+0x11a>
jmp    12f2 <ffi4fi1+0x1f2>
mov    -0x30(%rbp),%rax
mov    (%rax),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ffi4fi1>:
ucomisd 0xef8(%rip),%xmm0
jne    1175 <ffi4fi1+0x75>
jp     1175 <ffi4fi1+0x75>
xorpd  %xmm2,%xmm2
ucomisd %xmm2,%xmm1
jne    1175 <ffi4fi1+0x75>
jp     1175 <ffi4fi1+0x75>
test   %rsi,%rsi
jle    11eb <ffi4fi1+0xeb>
xor    %eax,%eax
mov    0x2ec6(%rip),%r8
jmp    114a <ffi4fi1+0x4a>
nopl   0x0(%rax)
movl   $0xfffffff5,(%rcx)
xor    %r9d,%r9d
mov    %r9b,(%rdx,%rax,1)
add    $0x1,%rax
cmp    %rax,%rsi
je     11eb <ffi4fi1+0xeb>
mov    (%rdi,%rax,8),%r10
test   %r10,%r10
js     1130 <ffi4fi1+0x30>
mov    (%r8),%r9
cmp    %r9,%r10
jle    1170 <ffi4fi1+0x70>
movl   $0xfffffff5,(%rcx)
jmp    1139 <ffi4fi1+0x39>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %r10d,%r9d
jmp    1139 <ffi4fi1+0x39>
test   %rsi,%rsi
jle    11eb <ffi4fi1+0xeb>
xor    %eax,%eax
movsd  0xe84(%rip),%xmm2
movsd  0xe84(%rip),%xmm3
mov    0x2e5d(%rip),%r8
movsd  0xe7d(%rip),%xmm4
jmp    11b6 <ffi4fi1+0xb6>
nopl   (%rax)
movl   $0xfffffff5,(%rcx)
xor    %r9d,%r9d
mov    %r9b,(%rdx,%rax,1)
add    $0x1,%rax
cmp    %rax,%rsi
je     11eb <ffi4fi1+0xeb>
xorps  %xmm5,%xmm5
cvtsi2sdq (%rdi,%rax,8),%xmm5
subsd  %xmm1,%xmm5
divsd  %xmm0,%xmm5
ucomisd %xmm5,%xmm2
ja     11a0 <ffi4fi1+0xa0>
ucomisd %xmm3,%xmm5
jbe    11e0 <ffi4fi1+0xe0>
movl   $0xfffffff5,(%rcx)
movzbl (%r8),%r9d
jmp    11a9 <ffi4fi1+0xa9>
nop
addsd  %xmm4,%xmm5
cvttsd2si %xmm5,%r9d
jmp    11a9 <ffi4fi1+0xa9>
mov    (%rcx),%eax
ret

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

LLVM IR (-O2):
@UCHAR_MAX = global i64 0
define i32 @ffi4fi1(i64* nocapture %0, i64 %1, double %2, double %3, i8* 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 %31, label %53
12: ; preds = %6
br i1 %10, label %13, label %53
13: ; preds = %12, %26
%14 = phi i64 [ %29, %26 ], [ 0, %12 ]
%15 = getelementptr inbounds i64, i64* %0, i64 %14
%16 = load i64, i64* %15
%17 = icmp slt i64 %16, 0
br i1 %17, label %18, label %19
18: ; preds = %13
store i32 -11, i32* %5
br label %26
19: ; preds = %13
%20 = load i64, i64* @UCHAR_MAX
%21 = icmp sgt i64 %16, %20
br i1 %21, label %22, label %24
22: ; preds = %19
store i32 -11, i32* %5
%23 = trunc i64 %20 to i8
br label %26
24: ; preds = %19
%25 = trunc i64 %16 to i8
br label %26
26: ; preds = %18, %24, %22
%27 = phi i8 [ 0, %18 ], [ %25, %24 ], [ %23, %22 ]
%28 = getelementptr inbounds i8, i8* %4, i64 %14
store i8 %27, i8* %28
%29 = add nuw nsw i64 %14, 1
%30 = icmp eq i64 %29, %1
br i1 %30, label %53, label %13
31: ; preds = %11, %48
%32 = phi i64 [ %51, %48 ], [ 0, %11 ]
%33 = getelementptr inbounds i64, i64* %0, i64 %32
%34 = load i64, i64* %33
%35 = sitofp i64 %34 to double
%36 = fsub double %35, %3
%37 = fdiv double %36, %2
%38 = fcmp olt double %37, -4.900000e-01
br i1 %38, label %39, label %40
39: ; preds = %31
store i32 -11, i32* %5
br label %48
40: ; preds = %31
%41 = fcmp ogt double %37, 2.554900e+02
br i1 %41, label %42, label %45
42: ; preds = %40
store i32 -11, i32* %5
%43 = load i64, i64* @UCHAR_MAX
%44 = trunc i64 %43 to i8
br label %48
45: ; preds = %40
%46 = fadd double %37, 5.000000e-01
%47 = fptoui double %46 to i8
br label %48
48: ; preds = %39, %45, %42
%49 = phi i8 [ 0, %39 ], [ %47, %45 ], [ %44, %42 ]
%50 = getelementptr inbounds i8, i8* %4, i64 %32
store i8 %49, i8* %50
%51 = add nuw nsw i64 %32, 1
%52 = icmp eq i64 %51, %1
br i1 %52, label %53, label %31
53: ; preds = %48, %26, %11, %12
%54 = load i32, i32* %5
ret i32 %54
}