void simple_smul(int m, int n, double *scalar, double *a, int a_row_stride,
                 int a_col_stride) {
  int i, j;
  for (i = 0; i < m; i++) {
    for (j = 0; j < n; j++) {
      a[(i)*a_row_stride + (j)*a_col_stride] =
          a[(i)*a_row_stride + (j)*a_col_stride] * *scalar;
    }
  }
}


x86 assembly (clang, -O0):
<simple_smul>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %rdx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8d,-0x1c(%rbp)
mov    %r9d,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11a1 <simple_smul+0xa1>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    118e <simple_smul+0x8e>
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
mov    -0x28(%rbp),%edx
imul   -0x20(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mulsd  (%rax),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
mov    -0x28(%rbp),%edx
imul   -0x20(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1134 <simple_smul+0x34>
jmp    1193 <simple_smul+0x93>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1121 <simple_smul+0x21>
pop    %rbp
ret

x86 assembly (clang, -O2):
<simple_smul>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %edi,%edi
jle    138c <simple_smul+0x28c>
mov    %rcx,%r12
movslq %r9d,%rax
movslq %r8d,%rbp
mov    %rax,%r8
mov    %edi,%eax
mov    %rax,-0x8(%rsp)
mov    %esi,%ecx
lea    0x8(%rdx),%rax
mov    %rax,-0x20(%rsp)
mov    %ecx,%eax
and    $0xfffffffc,%eax
mov    %rax,-0x30(%rsp)
add    $0xfffffffffffffffc,%rax
mov    %rax,-0x38(%rsp)
mov    %rax,%rdi
shr    $0x2,%rdi
add    $0x1,%rdi
cmp    $0x4,%esi
setae  %al
cmp    $0x1,%r8d
sete   %bl
and    %al,%bl
mov    %bl,-0x59(%rsp)
mov    %rdi,%rax
mov    %rdi,-0x40(%rsp)
and    $0xfffffffffffffffe,%rdi
mov    %rdi,-0x48(%rsp)
mov    %rcx,%rax
mov    %rcx,-0x58(%rsp)
neg    %rcx
mov    %rcx,-0x18(%rsp)
mov    %r8,%r9
shl    $0x5,%r9
lea    0x10(%r12),%r15
mov    %r8,%rcx
shl    $0x6,%rcx
mov    %r8,%r14
shl    $0x4,%r14
mov    %rbp,-0x50(%rsp)
lea    0x0(,%rbp,8),%rax
mov    %rax,-0x10(%rsp)
lea    0x0(,%r8,8),%rax
mov    %rax,-0x28(%rsp)
xor    %r11d,%r11d
xor    %r13d,%r13d
xor    %r10d,%r10d
jmp    11ef <simple_smul+0xef>
cs nopw 0x0(%rax,%rax,1)
add    $0x1,%r10
mov    -0x10(%rsp),%rax
add    %rax,%r15
add    -0x50(%rsp),%r13
add    %rax,%r11
cmp    -0x8(%rsp),%r10
je     138c <simple_smul+0x28c>
test   %esi,%esi
jle    11d0 <simple_smul+0xd0>
mov    %r10,%rbx
imul   -0x50(%rsp),%rbx
cmpb   $0x0,-0x59(%rsp)
je     1227 <simple_smul+0x127>
lea    (%r12,%rbx,8),%rax
cmp    -0x20(%rsp),%rax
jae    12ba <simple_smul+0x1ba>
mov    -0x58(%rsp),%rax
add    %rbx,%rax
lea    (%r12,%rax,8),%rax
cmp    %rdx,%rax
jbe    12ba <simple_smul+0x1ba>
xor    %eax,%eax
mov    %rax,%rdi
testb  $0x1,-0x58(%rsp)
je     1254 <simple_smul+0x154>
mov    %rax,%rdi
imul   %r8,%rdi
add    %rbx,%rdi
movsd  (%r12,%rdi,8),%xmm0
mulsd  (%rdx),%xmm0
movsd  %xmm0,(%r12,%rdi,8)
mov    %rax,%rdi
or     $0x1,%rdi
not    %rax
cmp    -0x18(%rsp),%rax
je     11d0 <simple_smul+0xd0>
mov    -0x58(%rsp),%rax
sub    %rdi,%rax
mov    %r8,%rbp
imul   %rdi,%rbp
add    %r13,%rbp
add    $0x1,%rdi
imul   -0x28(%rsp),%rdi
add    %r11,%rdi
mov    %r12,%rbx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rbx,%rbp,8),%xmm0
mulsd  (%rdx),%xmm0
movsd  %xmm0,(%rbx,%rbp,8)
movsd  (%rbx,%rdi,1),%xmm0
mulsd  (%rdx),%xmm0
movsd  %xmm0,(%rbx,%rdi,1)
add    %r14,%rbx
add    $0xfffffffffffffffe,%rax
jne    1290 <simple_smul+0x190>
jmp    11d0 <simple_smul+0xd0>
mov    %r8,%rbp
mov    %r12,%rax
cmpq   $0x0,-0x38(%rsp)
je     1333 <simple_smul+0x233>
movsd  (%rdx),%xmm0
unpcklpd %xmm0,%xmm0
mov    -0x48(%rsp),%rdi
mov    %r15,%r12
xor    %r8d,%r8d
nopl   0x0(%rax,%rax,1)
movupd -0x10(%r12),%xmm1
movupd (%r12),%xmm2
mulpd  %xmm0,%xmm1
mulpd  %xmm0,%xmm2
movupd %xmm1,-0x10(%r12)
movupd %xmm2,(%r12)
movupd -0x10(%r12,%r9,1),%xmm1
movupd (%r12,%r9,1),%xmm2
mulpd  %xmm0,%xmm1
mulpd  %xmm0,%xmm2
movupd %xmm1,-0x10(%r12,%r9,1)
movupd %xmm2,(%r12,%r9,1)
add    $0x8,%r8
add    %rcx,%r12
add    $0xfffffffffffffffe,%rdi
jne    12e0 <simple_smul+0x1e0>
jmp    1336 <simple_smul+0x236>
xor    %r8d,%r8d
testb  $0x1,-0x40(%rsp)
mov    %rax,%r12
je     1371 <simple_smul+0x271>
imul   %rbp,%r8
add    %rbx,%r8
movupd (%r12,%r8,8),%xmm0
movupd 0x10(%r12,%r8,8),%xmm1
movsd  (%rdx),%xmm2
unpcklpd %xmm2,%xmm2
mulpd  %xmm2,%xmm0
mulpd  %xmm1,%xmm2
movupd %xmm0,(%r12,%r8,8)
movupd %xmm2,0x10(%r12,%r8,8)
mov    -0x30(%rsp),%rdi
mov    %rdi,%rax
cmp    -0x58(%rsp),%rdi
mov    %rbp,%r8
je     11d0 <simple_smul+0xd0>
jmp    1229 <simple_smul+0x129>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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