int constantF(float *pval, int rn, float *rp) {

  int k;
  double val = *pval;
  for (k = 0; k < rn; k++) {
    rp[k] = val;
  }
  return 0;
}


x86 assembly (clang, -O0):
<constantF>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movss  (%rax),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1157 <constantF+0x57>
movsd  -0x28(%rbp),%xmm0
cvtsd2ss %xmm0,%xmm0
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1127 <constantF+0x27>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<constantF>:
test   %esi,%esi
jle    120e <constantF+0x10e>
movss  (%rdi),%xmm0
mov    %esi,%eax
cmp    $0x8,%esi
jae    111a <constantF+0x1a>
xor    %ecx,%ecx
jmp    1200 <constantF+0x100>
mov    %eax,%ecx
and    $0xfffffff8,%ecx
movaps %xmm0,%xmm1
shufps $0x0,%xmm0,%xmm1
lea    -0x8(%rcx),%rsi
mov    %rsi,%rdi
shr    $0x3,%rdi
add    $0x1,%rdi
mov    %edi,%r8d
and    $0x7,%r8d
cmp    $0x38,%rsi
jae    1149 <constantF+0x49>
xor    %esi,%esi
jmp    11c1 <constantF+0xc1>
and    $0xfffffffffffffff8,%rdi
xor    %esi,%esi
nop
movups %xmm1,(%rdx,%rsi,4)
movups %xmm1,0x10(%rdx,%rsi,4)
movups %xmm1,0x20(%rdx,%rsi,4)
movups %xmm1,0x30(%rdx,%rsi,4)
movups %xmm1,0x40(%rdx,%rsi,4)
movups %xmm1,0x50(%rdx,%rsi,4)
movups %xmm1,0x60(%rdx,%rsi,4)
movups %xmm1,0x70(%rdx,%rsi,4)
movups %xmm1,0x80(%rdx,%rsi,4)
movups %xmm1,0x90(%rdx,%rsi,4)
movups %xmm1,0xa0(%rdx,%rsi,4)
movups %xmm1,0xb0(%rdx,%rsi,4)
movups %xmm1,0xc0(%rdx,%rsi,4)
movups %xmm1,0xd0(%rdx,%rsi,4)
movups %xmm1,0xe0(%rdx,%rsi,4)
movups %xmm1,0xf0(%rdx,%rsi,4)
add    $0x40,%rsi
add    $0xfffffffffffffff8,%rdi
jne    1150 <constantF+0x50>
test   %r8,%r8
je     11f2 <constantF+0xf2>
lea    (%rdx,%rsi,4),%rsi
add    $0x10,%rsi
shl    $0x5,%r8
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movups %xmm1,-0x10(%rsi,%rdi,1)
movups %xmm1,(%rsi,%rdi,1)
add    $0x20,%rdi
cmp    %rdi,%r8
jne    11e0 <constantF+0xe0>
cmp    %rax,%rcx
je     120e <constantF+0x10e>
nopw   0x0(%rax,%rax,1)
movss  %xmm0,(%rdx,%rcx,4)
add    $0x1,%rcx
cmp    %rcx,%rax
jne    1200 <constantF+0x100>
xor    %eax,%eax
ret

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

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