int clipdouble(double *x, double xmin, double xmax, long n) {
  long i = 0;
  for (i = 0; i < n; ++i) {
    if (x[i] < xmin)
      x[i] = xmin;
    if (x[i] > xmax)
      x[i] = xmax;
  }
  return (0);
}


x86 assembly (clang, -O0):
<clipdouble>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
mov    %rsi,-0x20(%rbp)
movq   $0x0,-0x28(%rbp)
movq   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x20(%rbp),%rax
jge    11a2 <clipdouble+0xa2>
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x10(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1162 <clipdouble+0x62>
movsd  -0x10(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x18(%rbp),%xmm0
jbe    118c <clipdouble+0x8c>
movsd  -0x18(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1191 <clipdouble+0x91>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1126 <clipdouble+0x26>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<clipdouble>:
test   %rsi,%rsi
jle    1128 <clipdouble+0x28>
cmp    $0x1,%rsi
jne    112b <clipdouble+0x2b>
xor    %eax,%eax
test   $0x1,%sil
je     1128 <clipdouble+0x28>
movsd  (%rdi,%rax,8),%xmm2
ucomisd %xmm2,%xmm0
maxsd  %xmm2,%xmm0
ja     1199 <clipdouble+0x99>
ucomisd %xmm1,%xmm0
ja     1199 <clipdouble+0x99>
xor    %eax,%eax
ret
mov    %rsi,%rcx
and    $0xfffffffffffffffe,%rcx
xor    %eax,%eax
jmp    1157 <clipdouble+0x57>
cs nopw 0x0(%rax,%rax,1)
movapd %xmm1,%xmm3
minsd  %xmm2,%xmm3
movsd  %xmm3,0x8(%rdi,%rax,8)
add    $0x2,%rax
cmp    %rax,%rcx
je     110d <clipdouble+0xd>
movsd  (%rdi,%rax,8),%xmm3
ucomisd %xmm3,%xmm0
movapd %xmm0,%xmm2
maxsd  %xmm3,%xmm2
ja     1170 <clipdouble+0x70>
ucomisd %xmm1,%xmm2
jbe    117d <clipdouble+0x7d>
movapd %xmm1,%xmm3
minsd  %xmm2,%xmm3
movsd  %xmm3,(%rdi,%rax,8)
movsd  0x8(%rdi,%rax,8),%xmm3
ucomisd %xmm3,%xmm0
movapd %xmm0,%xmm2
maxsd  %xmm3,%xmm2
ja     1140 <clipdouble+0x40>
ucomisd %xmm1,%xmm2
jbe    114e <clipdouble+0x4e>
jmp    1140 <clipdouble+0x40>
minsd  %xmm0,%xmm1
movsd  %xmm1,(%rdi,%rax,8)
xor    %eax,%eax
ret

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

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