void scaleg(int n, double g[], const double xscale[], double fscale) {
  int i;
  for (i = 0; i < n; i++) {
    g[i] *= xscale[i] * fscale;
  }
}


x86 assembly (clang, -O0):
<scaleg>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movsd  %xmm0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1159 <scaleg+0x59>
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x20(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    111b <scaleg+0x1b>
pop    %rbp
ret

x86 assembly (clang, -O2):
<scaleg>:
test   %edi,%edi
jle    126f <scaleg+0x16f>
mov    %edi,%r9d
cmp    $0x4,%edi
jb     1122 <scaleg+0x22>
lea    (%rdx,%r9,8),%rax
cmp    %rsi,%rax
jbe    1187 <scaleg+0x87>
lea    (%rsi,%r9,8),%rax
cmp    %rdx,%rax
jbe    1187 <scaleg+0x87>
xor    %ecx,%ecx
mov    %rcx,%rax
not    %rax
test   $0x1,%r9b
je     1147 <scaleg+0x47>
movsd  (%rdx,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  (%rsi,%rcx,8),%xmm1
movsd  %xmm1,(%rsi,%rcx,8)
or     $0x1,%rcx
add    %r9,%rax
je     126f <scaleg+0x16f>
movsd  (%rdx,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  (%rsi,%rcx,8),%xmm1
movsd  %xmm1,(%rsi,%rcx,8)
movsd  0x8(%rdx,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  0x8(%rsi,%rcx,8),%xmm1
movsd  %xmm1,0x8(%rsi,%rcx,8)
add    $0x2,%rcx
cmp    %rcx,%r9
jne    1150 <scaleg+0x50>
jmp    126f <scaleg+0x16f>
mov    %r9d,%ecx
and    $0xfffffffc,%ecx
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
lea    -0x4(%rcx),%rax
mov    %rax,%r8
shr    $0x2,%r8
add    $0x1,%r8
test   %rax,%rax
je     1270 <scaleg+0x170>
mov    %r8,%rax
and    $0xfffffffffffffffe,%rax
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
movupd (%rdx,%rdi,8),%xmm2
movupd 0x10(%rdx,%rdi,8),%xmm3
mulpd  %xmm1,%xmm2
mulpd  %xmm1,%xmm3
movupd (%rsi,%rdi,8),%xmm4
mulpd  %xmm2,%xmm4
movupd 0x10(%rsi,%rdi,8),%xmm2
mulpd  %xmm3,%xmm2
movupd 0x20(%rsi,%rdi,8),%xmm3
movupd 0x30(%rsi,%rdi,8),%xmm5
movupd %xmm4,(%rsi,%rdi,8)
movupd %xmm2,0x10(%rsi,%rdi,8)
movupd 0x20(%rdx,%rdi,8),%xmm2
movupd 0x30(%rdx,%rdi,8),%xmm4
mulpd  %xmm1,%xmm2
mulpd  %xmm3,%xmm2
mulpd  %xmm1,%xmm4
mulpd  %xmm5,%xmm4
movupd %xmm2,0x20(%rsi,%rdi,8)
movupd %xmm4,0x30(%rsi,%rdi,8)
add    $0x8,%rdi
add    $0xfffffffffffffffe,%rax
jne    11c0 <scaleg+0xc0>
test   $0x1,%r8b
je     1266 <scaleg+0x166>
movupd (%rdx,%rdi,8),%xmm2
movupd 0x10(%rdx,%rdi,8),%xmm3
mulpd  %xmm1,%xmm2
mulpd  %xmm1,%xmm3
movupd (%rsi,%rdi,8),%xmm1
mulpd  %xmm2,%xmm1
movupd 0x10(%rsi,%rdi,8),%xmm2
mulpd  %xmm3,%xmm2
movupd %xmm1,(%rsi,%rdi,8)
movupd %xmm2,0x10(%rsi,%rdi,8)
cmp    %r9,%rcx
jne    1124 <scaleg+0x24>
ret
xor    %edi,%edi
test   $0x1,%r8b
jne    1235 <scaleg+0x135>
jmp    1266 <scaleg+0x166>

LLVM IR (-O0):
define void @scaleg(i32 %0, double* %1, double* %2, double %3) {
%5 = alloca i32
%6 = alloca double*
%7 = alloca double*
%8 = alloca double
%9 = alloca i32
store i32 %0, i32* %5
store double* %1, double** %6
store double* %2, double** %7
store double %3, double* %8
store i32 0, i32* %9
br label %10
10: ; preds = %28, %4
%11 = load i32, i32* %9
%12 = load i32, i32* %5
%13 = icmp slt i32 %11, %12
br i1 %13, label %14, label %31
14: ; preds = %10
%15 = load double*, double** %7
%16 = load i32, i32* %9
%17 = sext i32 %16 to i64
%18 = getelementptr inbounds double, double* %15, i64 %17
%19 = load double, double* %18
%20 = load double, double* %8
%21 = fmul double %19, %20
%22 = load double*, double** %6
%23 = load i32, i32* %9
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds double, double* %22, i64 %24
%26 = load double, double* %25
%27 = fmul double %26, %21
store double %27, double* %25
br label %28
28: ; preds = %14
%29 = load i32, i32* %9
%30 = add nsw i32 %29, 1
store i32 %30, i32* %9
br label %10
31: ; preds = %10
ret void
}

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