void vclip(double *a, double *b, double loval, double hival, int n) {
  int i;
  double t;
  for (i = 0; i < n; i++) {
    t = ((b[i]) < (loval) ? (loval) : (b[i]));
    a[i] = ((t) < (hival) ? (t) : (hival));
  }
}


x86 assembly (clang, -O0):
<vclip>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
movsd  %xmm1,-0x20(%rbp)
mov    %edx,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    11c0 <vclip+0xc0>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x18(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1157 <vclip+0x57>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
jmp    1169 <vclip+0x69>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm1
movsd  -0x20(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1196 <vclip+0x96>
movsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
jmp    11a0 <vclip+0xa0>
movsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1120 <vclip+0x20>
pop    %rbp
ret

x86 assembly (clang, -O2):
<vclip>:
test   %edx,%edx
jle    1261 <vclip+0x161>
mov    %edx,%r9d
cmp    $0x4,%edx
jb     1122 <vclip+0x22>
lea    (%rsi,%r9,8),%rax
cmp    %rdi,%rax
jbe    1184 <vclip+0x84>
lea    (%rdi,%r9,8),%rax
cmp    %rsi,%rax
jbe    1184 <vclip+0x84>
xor    %ecx,%ecx
mov    %rcx,%rax
not    %rax
test   $0x1,%r9b
je     1146 <vclip+0x46>
movapd %xmm0,%xmm2
maxsd  (%rsi,%rcx,8),%xmm2
minsd  %xmm1,%xmm2
movsd  %xmm2,(%rdi,%rcx,8)
or     $0x1,%rcx
add    %r9,%rax
je     1261 <vclip+0x161>
nop
movapd %xmm0,%xmm2
maxsd  (%rsi,%rcx,8),%xmm2
minsd  %xmm1,%xmm2
movsd  %xmm2,(%rdi,%rcx,8)
movapd %xmm0,%xmm2
maxsd  0x8(%rsi,%rcx,8),%xmm2
minsd  %xmm1,%xmm2
movsd  %xmm2,0x8(%rdi,%rcx,8)
add    $0x2,%rcx
cmp    %rcx,%r9
jne    1150 <vclip+0x50>
jmp    1261 <vclip+0x161>
mov    %r9d,%ecx
and    $0xfffffffc,%ecx
movapd %xmm0,%xmm2
unpcklpd %xmm0,%xmm2
movapd %xmm1,%xmm3
unpcklpd %xmm1,%xmm3
lea    -0x4(%rcx),%rax
mov    %rax,%r8
shr    $0x2,%r8
add    $0x1,%r8
test   %rax,%rax
je     1262 <vclip+0x162>
mov    %r8,%rax
and    $0xfffffffffffffffe,%rax
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movupd (%rsi,%rdx,8),%xmm4
movupd 0x10(%rsi,%rdx,8),%xmm5
movapd %xmm2,%xmm6
maxpd  %xmm4,%xmm6
movapd %xmm2,%xmm4
maxpd  %xmm5,%xmm4
minpd  %xmm3,%xmm6
minpd  %xmm3,%xmm4
movupd %xmm6,(%rdi,%rdx,8)
movupd %xmm4,0x10(%rdi,%rdx,8)
movupd 0x20(%rsi,%rdx,8),%xmm4
movupd 0x30(%rsi,%rdx,8),%xmm5
movapd %xmm2,%xmm6
maxpd  %xmm4,%xmm6
movapd %xmm2,%xmm4
maxpd  %xmm5,%xmm4
minpd  %xmm3,%xmm6
minpd  %xmm3,%xmm4
movupd %xmm6,0x20(%rdi,%rdx,8)
movupd %xmm4,0x30(%rdi,%rdx,8)
add    $0x8,%rdx
add    $0xfffffffffffffffe,%rax
jne    11c0 <vclip+0xc0>
test   $0x1,%r8b
je     1258 <vclip+0x158>
movupd (%rsi,%rdx,8),%xmm4
movupd 0x10(%rsi,%rdx,8),%xmm5
movapd %xmm2,%xmm6
maxpd  %xmm4,%xmm6
maxpd  %xmm5,%xmm2
minpd  %xmm3,%xmm6
minpd  %xmm3,%xmm2
movupd %xmm6,(%rdi,%rdx,8)
movupd %xmm2,0x10(%rdi,%rdx,8)
cmp    %r9,%rcx
jne    1124 <vclip+0x24>
ret
xor    %edx,%edx
test   $0x1,%r8b
jne    122e <vclip+0x12e>
jmp    1258 <vclip+0x158>

LLVM IR (-O0):
define void @vclip(double* %0, double* %1, double %2, double %3, i32 %4) {
%6 = alloca double*
%7 = alloca double*
%8 = alloca double
%9 = alloca double
%10 = alloca i32
%11 = alloca i32
%12 = alloca double
store double* %0, double** %6
store double* %1, double** %7
store double %2, double* %8
store double %3, double* %9
store i32 %4, i32* %10
store i32 0, i32* %11
br label %13
13: ; preds = %48, %5
%14 = load i32, i32* %11
%15 = load i32, i32* %10
%16 = icmp slt i32 %14, %15
br i1 %16, label %17, label %51
17: ; preds = %13
%18 = load double*, double** %7
%19 = load i32, i32* %11
%20 = sext i32 %19 to i64
%21 = getelementptr inbounds double, double* %18, i64 %20
%22 = load double, double* %21
%23 = load double, double* %8
%24 = fcmp olt double %22, %23
br i1 %24, label %25, label %27
25: ; preds = %17
%26 = load double, double* %8
br label %33
27: ; preds = %17
%28 = load double*, double** %7
%29 = load i32, i32* %11
%30 = sext i32 %29 to i64
%31 = getelementptr inbounds double, double* %28, i64 %30
%32 = load double, double* %31
br label %33
33: ; preds = %27, %25
%34 = phi double [ %26, %25 ], [ %32, %27 ]
store double %34, double* %12
%35 = load double, double* %12
%36 = load double, double* %9
%37 = fcmp olt double %35, %36
br i1 %37, label %38, label %40
38: ; preds = %33
%39 = load double, double* %12
br label %42
40: ; preds = %33
%41 = load double, double* %9
br label %42
42: ; preds = %40, %38
%43 = phi double [ %39, %38 ], [ %41, %40 ]
%44 = load double*, double** %6
%45 = load i32, i32* %11
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds double, double* %44, i64 %46
store double %43, double* %47
br label %48
48: ; preds = %42
%49 = load i32, i32* %11
%50 = add nsw i32 %49, 1
store i32 %50, i32* %11
br label %13
51: ; preds = %13
ret void
}

LLVM IR (-O2):
define void @vclip(double* nocapture writeonly %0, double* nocapture %1, double %2, double %3, i32 %4) {
%6 = icmp sgt i32 %4, 0
br i1 %6, label %7, label %137
7: ; preds = %5
%8 = zext i32 %4 to i64
%9 = icmp ult i32 %4, 4
br i1 %9, label %100, label %10
10: ; preds = %7
%11 = getelementptr double, double* %0, i64 %8
%12 = getelementptr double, double* %1, i64 %8
%13 = icmp ugt double* %12, %0
%14 = icmp ugt double* %11, %1
%15 = and i1 %13, %14
br i1 %15, label %100, label %16
16: ; preds = %10
%17 = and i64 %8, 4294967292
%18 = insertelement <2 x double> poison, double %2, i64 0
%19 = shufflevector <2 x double> %18, <2 x double> poison, <2 x i32> zeroinitializer
%20 = insertelement <2 x double> poison, double %2, i64 0
%21 = shufflevector <2 x double> %20, <2 x double> poison, <2 x i32> zeroinitializer
%22 = insertelement <2 x double> poison, double %3, i64 0
%23 = shufflevector <2 x double> %22, <2 x double> poison, <2 x i32> zeroinitializer
%24 = insertelement <2 x double> poison, double %3, i64 0
%25 = shufflevector <2 x double> %24, <2 x double> poison, <2 x i32> zeroinitializer
%26 = add nsw i64 %17, -4
%27 = lshr exact i64 %26, 2
%28 = add nuw nsw i64 %27, 1
%29 = and i64 %28, 1
%30 = icmp eq i64 %26, 0
br i1 %30, label %76, label %31
31: ; preds = %16
%32 = and i64 %28, 9223372036854775806
br label %33
33: ; preds = %33, %31
%34 = phi i64 [ 0, %31 ], [ %73, %33 ]
%35 = phi i64 [ 0, %31 ], [ %74, %33 ]
%36 = getelementptr inbounds double, double* %1, i64 %34
%37 = bitcast double* %36 to <2 x double>*
%38 = load <2 x double>, <2 x double>* %37
%39 = getelementptr inbounds double, double* %36, i64 2
%40 = bitcast double* %39 to <2 x double>*
%41 = load <2 x double>, <2 x double>* %40
%42 = fcmp olt <2 x double> %38, %19
%43 = fcmp olt <2 x double> %41, %21
%44 = select <2 x i1> %42, <2 x double> %19, <2 x double> %38
%45 = select <2 x i1> %43, <2 x double> %21, <2 x double> %41
%46 = fcmp olt <2 x double> %44, %23
%47 = fcmp olt <2 x double> %45, %25
%48 = select <2 x i1> %46, <2 x double> %44, <2 x double> %23
%49 = select <2 x i1> %47, <2 x double> %45, <2 x double> %25
%50 = getelementptr inbounds double, double* %0, i64 %34
%51 = bitcast double* %50 to <2 x double>*
store <2 x double> %48, <2 x double>* %51
%52 = getelementptr inbounds double, double* %50, i64 2
%53 = bitcast double* %52 to <2 x double>*
store <2 x double> %49, <2 x double>* %53
%54 = or i64 %34, 4
%55 = getelementptr inbounds double, double* %1, i64 %54
%56 = bitcast double* %55 to <2 x double>*
%57 = load <2 x double>, <2 x double>* %56
%58 = getelementptr inbounds double, double* %55, i64 2
%59 = bitcast double* %58 to <2 x double>*
%60 = load <2 x double>, <2 x double>* %59
%61 = fcmp olt <2 x double> %57, %19
%62 = fcmp olt <2 x double> %60, %21
%63 = select <2 x i1> %61, <2 x double> %19, <2 x double> %57
%64 = select <2 x i1> %62, <2 x double> %21, <2 x double> %60
%65 = fcmp olt <2 x double> %63, %23
%66 = fcmp olt <2 x double> %64, %25
%67 = select <2 x i1> %65, <2 x double> %63, <2 x double> %23
%68 = select <2 x i1> %66, <2 x double> %64, <2 x double> %25
%69 = getelementptr inbounds double, double* %0, i64 %54
%70 = bitcast double* %69 to <2 x double>*
store <2 x double> %67, <2 x double>* %70
%71 = getelementptr inbounds double, double* %69, i64 2
%72 = bitcast double* %71 to <2 x double>*
store <2 x double> %68, <2 x double>* %72
%73 = add nuw i64 %34, 8
%74 = add i64 %35, 2
%75 = icmp eq i64 %74, %32
br i1 %75, label %76, label %33
76: ; preds = %33, %16
%77 = phi i64 [ 0, %16 ], [ %73, %33 ]
%78 = icmp eq i64 %29, 0
br i1 %78, label %98, label %79
79: ; preds = %76
%80 = getelementptr inbounds double, double* %1, i64 %77
%81 = bitcast double* %80 to <2 x double>*
%82 = load <2 x double>, <2 x double>* %81
%83 = getelementptr inbounds double, double* %80, i64 2
%84 = bitcast double* %83 to <2 x double>*
%85 = load <2 x double>, <2 x double>* %84
%86 = fcmp olt <2 x double> %82, %19
%87 = fcmp olt <2 x double> %85, %21
%88 = select <2 x i1> %86, <2 x double> %19, <2 x double> %82
%89 = select <2 x i1> %87, <2 x double> %21, <2 x double> %85
%90 = fcmp olt <2 x double> %88, %23
%91 = fcmp olt <2 x double> %89, %25
%92 = select <2 x i1> %90, <2 x double> %88, <2 x double> %23
%93 = select <2 x i1> %91, <2 x double> %89, <2 x double> %25
%94 = getelementptr inbounds double, double* %0, i64 %77
%95 = bitcast double* %94 to <2 x double>*
store <2 x double> %92, <2 x double>* %95
%96 = getelementptr inbounds double, double* %94, i64 2
%97 = bitcast double* %96 to <2 x double>*
store <2 x double> %93, <2 x double>* %97
br label %98
98: ; preds = %76, %79
%99 = icmp eq i64 %17, %8
br i1 %99, label %137, label %100
100: ; preds = %10, %7, %98
%101 = phi i64 [ 0, %10 ], [ 0, %7 ], [ %17, %98 ]
%102 = xor i64 %101, -1
%103 = and i64 %8, 1
%104 = icmp eq i64 %103, 0
br i1 %104, label %114, label %105
105: ; preds = %100
%106 = getelementptr inbounds double, double* %1, i64 %101
%107 = load double, double* %106
%108 = fcmp olt double %107, %2
%109 = select i1 %108, double %2, double %107
%110 = fcmp olt double %109, %3
%111 = select i1 %110, double %109, double %3
%112 = getelementptr inbounds double, double* %0, i64 %101
store double %111, double* %112
%113 = or i64 %101, 1
br label %114
114: ; preds = %105, %100
%115 = phi i64 [ %101, %100 ], [ %113, %105 ]
%116 = sub nsw i64 0, %8
%117 = icmp eq i64 %102, %116
br i1 %117, label %137, label %118
118: ; preds = %114, %118
%119 = phi i64 [ %135, %118 ], [ %115, %114 ]
%120 = getelementptr inbounds double, double* %1, i64 %119
%121 = load double, double* %120
%122 = fcmp olt double %121, %2
%123 = select i1 %122, double %2, double %121
%124 = fcmp olt double %123, %3
%125 = select i1 %124, double %123, double %3
%126 = getelementptr inbounds double, double* %0, i64 %119
store double %125, double* %126
%127 = add nuw nsw i64 %119, 1
%128 = getelementptr inbounds double, double* %1, i64 %127
%129 = load double, double* %128
%130 = fcmp olt double %129, %2
%131 = select i1 %130, double %2, double %129
%132 = fcmp olt double %131, %3
%133 = select i1 %132, double %131, double %3
%134 = getelementptr inbounds double, double* %0, i64 %127
store double %133, double* %134
%135 = add nuw nsw i64 %119, 2
%136 = icmp eq i64 %135, %8
br i1 %136, label %137, label %118
137: ; preds = %114, %118, %98, %5
ret void
}