void m_add_scalar(double a, double *A, double *B, int nrow, int ncol) {
  int i;
  for (i = nrow * ncol; i > 0; i--)
    *B++ = a + *A++;
}


x86 assembly (clang, -O0):
<m_add_scalar>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %ecx,-0x20(%rbp)
mov    -0x1c(%rbp),%eax
imul   -0x20(%rbp),%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x0,-0x24(%rbp)
jle    1164 <m_add_scalar+0x64>
movsd  -0x8(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x10(%rbp)
addsd  (%rax),%xmm0
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x18(%rbp)
movsd  %xmm0,(%rax)
mov    -0x24(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x24(%rbp)
jmp    1121 <m_add_scalar+0x21>
pop    %rbp
ret

x86 assembly (clang, -O2):
<m_add_scalar>:
imul   %ecx,%edx
test   %edx,%edx
jle    121a <m_add_scalar+0x11a>
lea    -0x1(%rdx),%r10d
cmp    $0x3,%r10d
jb     11ec <m_add_scalar+0xec>
lea    (%rdi,%r10,8),%rax
add    $0x8,%rax
cmp    %rsi,%rax
jbe    1137 <m_add_scalar+0x37>
lea    (%rsi,%r10,8),%rax
add    $0x8,%rax
cmp    %rdi,%rax
ja     11ec <m_add_scalar+0xec>
add    $0x1,%r10
mov    %r10,%r8
and    $0xfffffffffffffffc,%r8
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
lea    -0x4(%r8),%rax
mov    %rax,%r9
shr    $0x2,%r9
add    $0x1,%r9
test   %rax,%rax
je     121b <m_add_scalar+0x11b>
mov    %r9,%rax
and    $0xfffffffffffffffe,%rax
xor    %ecx,%ecx
nopl   0x0(%rax,%rax,1)
movupd (%rdi,%rcx,8),%xmm2
movupd 0x10(%rdi,%rcx,8),%xmm3
addpd  %xmm1,%xmm2
addpd  %xmm1,%xmm3
movupd %xmm2,(%rsi,%rcx,8)
movupd %xmm3,0x10(%rsi,%rcx,8)
movupd 0x20(%rdi,%rcx,8),%xmm2
movupd 0x30(%rdi,%rcx,8),%xmm3
addpd  %xmm1,%xmm2
addpd  %xmm1,%xmm3
movupd %xmm2,0x20(%rsi,%rcx,8)
movupd %xmm3,0x30(%rsi,%rcx,8)
add    $0x8,%rcx
add    $0xfffffffffffffffe,%rax
jne    1170 <m_add_scalar+0x70>
test   $0x1,%r9b
je     11dc <m_add_scalar+0xdc>
movupd (%rdi,%rcx,8),%xmm2
movupd 0x10(%rdi,%rcx,8),%xmm3
addpd  %xmm1,%xmm2
addpd  %xmm1,%xmm3
movupd %xmm2,(%rsi,%rcx,8)
movupd %xmm3,0x10(%rsi,%rcx,8)
cmp    %r8,%r10
je     121a <m_add_scalar+0x11a>
sub    %r8d,%edx
lea    (%rdi,%r8,8),%rdi
lea    (%rsi,%r8,8),%rsi
add    $0x1,%edx
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rdi,%rax,1),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%rsi,%rax,1)
add    $0xffffffff,%edx
add    $0x8,%rax
cmp    $0x1,%edx
ja     1200 <m_add_scalar+0x100>
ret
xor    %ecx,%ecx
test   $0x1,%r9b
jne    11be <m_add_scalar+0xbe>
jmp    11dc <m_add_scalar+0xdc>

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

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