int NegateRealVector(q_p, nzq_p)
double *q_p;
int *nzq_p;
{
  double *q_ps;
  q_ps = q_p + *nzq_p;
  for (; q_p < q_ps; q_p++)
    *q_p = -*q_p;
  return 0;
}


x86 assembly (clang, -O0):
<NegateRealVector>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq (%rcx),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x18(%rbp)
mov    -0x8(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    1168 <NegateRealVector+0x68>
mov    -0x8(%rbp),%rax
movsd  (%rax),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mov    -0x8(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x8(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x8(%rbp)
jmp    1122 <NegateRealVector+0x22>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<NegateRealVector>:
movslq (%rsi),%rax
test   %rax,%rax
jle    1203 <NegateRealVector+0x103>
lea    (%rdi,%rax,8),%rax
lea    0x8(%rdi),%rdx
cmp    %rdx,%rax
cmova  %rax,%rdx
mov    %rdi,%rcx
not    %rcx
add    %rdx,%rcx
cmp    $0x18,%rcx
jb     11da <NegateRealVector+0xda>
shr    $0x3,%rcx
add    $0x1,%rcx
mov    %rcx,%r8
and    $0xfffffffffffffffc,%r8
lea    -0x4(%r8),%rdx
mov    %rdx,%r9
shr    $0x2,%r9
add    $0x1,%r9
test   %rdx,%rdx
je     1206 <NegateRealVector+0x106>
mov    %r9,%rdx
and    $0xfffffffffffffffe,%rdx
xor    %esi,%esi
movaps 0xe9b(%rip),%xmm0
cs nopw 0x0(%rax,%rax,1)
nop
movups (%rdi,%rsi,8),%xmm1
movups 0x10(%rdi,%rsi,8),%xmm2
movups 0x20(%rdi,%rsi,8),%xmm3
movups 0x30(%rdi,%rsi,8),%xmm4
xorps  %xmm0,%xmm1
xorps  %xmm0,%xmm2
movups %xmm1,(%rdi,%rsi,8)
movups %xmm2,0x10(%rdi,%rsi,8)
xorps  %xmm0,%xmm3
xorps  %xmm0,%xmm4
movups %xmm3,0x20(%rdi,%rsi,8)
movups %xmm4,0x30(%rdi,%rsi,8)
add    $0x8,%rsi
add    $0xfffffffffffffffe,%rdx
jne    1170 <NegateRealVector+0x70>
test   $0x1,%r9b
je     11d1 <NegateRealVector+0xd1>
movups (%rdi,%rsi,8),%xmm0
movups 0x10(%rdi,%rsi,8),%xmm1
movaps 0xe3e(%rip),%xmm2
xorps  %xmm2,%xmm0
xorps  %xmm2,%xmm1
movups %xmm0,(%rdi,%rsi,8)
movups %xmm1,0x10(%rdi,%rsi,8)
cmp    %r8,%rcx
je     1203 <NegateRealVector+0x103>
lea    (%rdi,%r8,8),%rdi
movaps 0xe1f(%rip),%xmm0
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rdi),%xmm1
xorps  %xmm0,%xmm1
movlps %xmm1,(%rdi)
add    $0x8,%rdi
cmp    %rax,%rdi
jb     11f0 <NegateRealVector+0xf0>
xor    %eax,%eax
ret
xor    %esi,%esi
test   $0x1,%r9b
jne    11b2 <NegateRealVector+0xb2>
jmp    11d1 <NegateRealVector+0xd1>

LLVM IR (-O0):
define i32 @NegateRealVector(double* %0, i32* %1) {
%3 = alloca double*
%4 = alloca i32*
%5 = alloca double*
store double* %0, double** %3
store i32* %1, i32** %4
%6 = load double*, double** %3
%7 = load i32*, i32** %4
%8 = load i32, i32* %7
%9 = sext i32 %8 to i64
%10 = getelementptr inbounds double, double* %6, i64 %9
store double* %10, double** %5
br label %11
11: ; preds = %20, %2
%12 = load double*, double** %3
%13 = load double*, double** %5
%14 = icmp ult double* %12, %13
br i1 %14, label %15, label %23
15: ; preds = %11
%16 = load double*, double** %3
%17 = load double, double* %16
%18 = fneg double %17
%19 = load double*, double** %3
store double %18, double* %19
br label %20
20: ; preds = %15
%21 = load double*, double** %3
%22 = getelementptr inbounds double, double* %21, i32 1
store double* %22, double** %3
br label %11
23: ; preds = %11
ret i32 0
}

LLVM IR (-O2):
define i32 @NegateRealVector(double* %0, i32* nocapture %1) {
%3 = ptrtoint double* %0 to i64
%4 = load i32, i32* %1
%5 = sext i32 %4 to i64
%6 = getelementptr inbounds double, double* %0, i64 %5
%7 = icmp sgt i32 %4, 0
br i1 %7, label %8, label %79
8: ; preds = %2
%9 = shl nsw i64 %5, 3
%10 = add i64 %9, %3
%11 = add i64 %3, 8
%12 = call i64 @llvm.umax.i64(i64 %10, i64 %11)
%13 = xor i64 %3, -1
%14 = add i64 %12, %13
%15 = lshr i64 %14, 3
%16 = add nuw nsw i64 %15, 1
%17 = icmp ult i64 %14, 24
br i1 %17, label %71, label %18
18: ; preds = %8
%19 = and i64 %16, 4611686018427387900
%20 = getelementptr double, double* %0, i64 %19
%21 = add nsw i64 %19, -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 %55, label %26
26: ; preds = %18
%27 = and i64 %23, 9223372036854775806
br label %28
28: ; preds = %28, %26
%29 = phi i64 [ 0, %26 ], [ %52, %28 ]
%30 = phi i64 [ 0, %26 ], [ %53, %28 ]
%31 = getelementptr double, double* %0, i64 %29
%32 = bitcast double* %31 to <2 x double>*
%33 = load <2 x double>, <2 x double>* %32
%34 = getelementptr double, double* %31, i64 2
%35 = bitcast double* %34 to <2 x double>*
%36 = load <2 x double>, <2 x double>* %35
%37 = fneg <2 x double> %33
%38 = fneg <2 x double> %36
%39 = bitcast double* %31 to <2 x double>*
store <2 x double> %37, <2 x double>* %39
%40 = bitcast double* %34 to <2 x double>*
store <2 x double> %38, <2 x double>* %40
%41 = or i64 %29, 4
%42 = getelementptr double, double* %0, i64 %41
%43 = bitcast double* %42 to <2 x double>*
%44 = load <2 x double>, <2 x double>* %43
%45 = getelementptr double, double* %42, i64 2
%46 = bitcast double* %45 to <2 x double>*
%47 = load <2 x double>, <2 x double>* %46
%48 = fneg <2 x double> %44
%49 = fneg <2 x double> %47
%50 = bitcast double* %42 to <2 x double>*
store <2 x double> %48, <2 x double>* %50
%51 = bitcast double* %45 to <2 x double>*
store <2 x double> %49, <2 x double>* %51
%52 = add nuw i64 %29, 8
%53 = add i64 %30, 2
%54 = icmp eq i64 %53, %27
br i1 %54, label %55, label %28
55: ; preds = %28, %18
%56 = phi i64 [ 0, %18 ], [ %52, %28 ]
%57 = icmp eq i64 %24, 0
br i1 %57, label %69, label %58
58: ; preds = %55
%59 = getelementptr double, double* %0, i64 %56
%60 = bitcast double* %59 to <2 x double>*
%61 = load <2 x double>, <2 x double>* %60
%62 = getelementptr double, double* %59, i64 2
%63 = bitcast double* %62 to <2 x double>*
%64 = load <2 x double>, <2 x double>* %63
%65 = fneg <2 x double> %61
%66 = fneg <2 x double> %64
%67 = bitcast double* %59 to <2 x double>*
store <2 x double> %65, <2 x double>* %67
%68 = bitcast double* %62 to <2 x double>*
store <2 x double> %66, <2 x double>* %68
br label %69
69: ; preds = %55, %58
%70 = icmp eq i64 %16, %19
br i1 %70, label %79, label %71
71: ; preds = %8, %69
%72 = phi double* [ %0, %8 ], [ %20, %69 ]
br label %73
73: ; preds = %71, %73
%74 = phi double* [ %77, %73 ], [ %72, %71 ]
%75 = load double, double* %74
%76 = fneg double %75
store double %76, double* %74
%77 = getelementptr inbounds double, double* %74, i64 1
%78 = icmp ult double* %77, %6
br i1 %78, label %73, label %79
79: ; preds = %73, %69, %2
ret i32 0
}