long double testl(long double x, long double y, long double *array, int n) {
  x = __builtin_copysignl(x, y);
  for (int i = 0; i < n; ++i)
    x = (x + 1) * array[i];
  return __builtin_hypotl(x, y);
}


x86 assembly (clang, -O0):
<testl>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
fldt   0x20(%rbp)
fldt   0x10(%rbp)
fstpt  -0x10(%rbp)
fstpt  -0x20(%rbp)
mov    %rdi,-0x28(%rbp)
mov    %esi,-0x2c(%rbp)
fldt   -0x10(%rbp)
fldt   -0x20(%rbp)
fstpt  -0x40(%rbp)
fabs
fld    %st(0)
fchs
mov    -0x37(%rbp),%al
test   $0x80,%al
fxch   %st(1)
fcmovne %st(1),%st
fstp   %st(1)
fstpt  -0x10(%rbp)
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    1184 <testl+0x74>
fldt   -0x10(%rbp)
fld1
faddp  %st,%st(1)
mov    -0x28(%rbp),%rax
movslq -0x30(%rbp),%rcx
shl    $0x4,%rcx
fldt   (%rax,%rcx,1)
fmulp  %st,%st(1)
fstpt  -0x10(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    114f <testl+0x3f>
fldt   -0x10(%rbp)
fldt   -0x20(%rbp)
mov    %rsp,%rax
fstpt  0x10(%rax)
fstpt  (%rax)
call   1030 <hypotl@plt>
fld    %st(0)
fstp   %st(0)
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<testl>:
sub    $0x38,%rsp
fldt   0x50(%rsp)
fldt   0x40(%rsp)
fld    %st(1)
fstpt  0x20(%rsp)
fabs
fld    %st(0)
fchs
testb  $0x80,0x29(%rsp)
fxch   %st(1)
fcmovne %st(1),%st
fstp   %st(1)
test   %esi,%esi
jle    1150 <testl+0x40>
mov    %esi,%edx
lea    -0x1(%rdx),%rcx
mov    %edx,%eax
and    $0x3,%eax
fldz
cmp    $0x3,%rcx
jae    115c <testl+0x4c>
xor    %ecx,%ecx
fldz
jmp    119e <testl+0x8e>
fldz
fldz
fxch   %st(1)
fxch   %st(2)
fxch   %st(1)
jmp    11d6 <testl+0xc6>
fstp   %st(0)
and    $0xfffffffc,%edx
lea    0x30(%rdi),%rsi
xor    %ecx,%ecx
fld1
fldz
fxch   %st(2)
fxch   %st(1)
nop
fstp   %st(2)
fadd   %st(1),%st
fldt   -0x30(%rsi)
fmulp  %st,%st(1)
fadd   %st(1),%st
fldt   -0x20(%rsi)
fmulp  %st,%st(1)
fadd   %st(1),%st
fldt   -0x10(%rsi)
fmulp  %st,%st(1)
fadd   %st(1),%st
fldt   (%rsi)
fmulp  %st,%st(1)
add    $0x4,%rcx
add    $0x40,%rsi
fld    %st(0)
cmp    %rcx,%rdx
fxch   %st(2)
jne    1170 <testl+0x60>
fstp   %st(0)
test   %rax,%rax
fldz
je     11d6 <testl+0xc6>
fstp   %st(1)
fstp   %st(0)
shl    $0x4,%rcx
add    %rcx,%rdi
shl    $0x4,%rax
xor    %ecx,%ecx
fld1
fldz
fxch   %st(2)
fxch   %st(1)
fstp   %st(2)
fadd   %st(1),%st
fldt   (%rdi,%rcx,1)
fmulp  %st,%st(1)
add    $0x10,%rcx
cmp    %rcx,%rax
fldz
fxch   %st(2)
jne    11c0 <testl+0xb0>
fstp   %st(2)
fstp   %st(1)
fxch   %st(1)
fstpt  0x10(%rsp)
fstpt  (%rsp)
call   1030 <hypotl@plt>
add    $0x38,%rsp
ret

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

LLVM IR (-O2):
define x86_fp80 @testl(x86_fp80 %0, x86_fp80 %1, x86_fp80* nocapture %2, i32 %3) {
%5 = tail call x86_fp80 @llvm.copysign.f80(x86_fp80 %0, x86_fp80 %1)
%6 = icmp sgt i32 %3, 0
br i1 %6, label %7, label %30
7: ; preds = %4
%8 = zext i32 %3 to i64
%9 = add nsw i64 %8, -1
%10 = and i64 %8, 3
%11 = icmp ult i64 %9, 3
br i1 %11, label %14, label %12
12: ; preds = %7
%13 = and i64 %8, 4294967292
br label %33
14: ; preds = %33, %7
%15 = phi x86_fp80 [ undef, %7 ], [ %55, %33 ]
%16 = phi i64 [ 0, %7 ], [ %56, %33 ]
%17 = phi x86_fp80 [ %5, %7 ], [ %55, %33 ]
%18 = icmp eq i64 %10, 0
br i1 %18, label %30, label %19
19: ; preds = %14, %19
%20 = phi i64 [ %27, %19 ], [ %16, %14 ]
%21 = phi x86_fp80 [ %26, %19 ], [ %17, %14 ]
%22 = phi i64 [ %28, %19 ], [ 0, %14 ]
%23 = fadd x86_fp80 %21, 0xK3FFF8000000000000000
%24 = getelementptr inbounds x86_fp80, x86_fp80* %2, i64 %20
%25 = load x86_fp80, x86_fp80* %24
%26 = fmul x86_fp80 %23, %25
%27 = add nuw nsw i64 %20, 1
%28 = add i64 %22, 1
%29 = icmp eq i64 %28, %10
br i1 %29, label %30, label %19
30: ; preds = %14, %19, %4
%31 = phi x86_fp80 [ %5, %4 ], [ %15, %14 ], [ %26, %19 ]
%32 = tail call x86_fp80 @hypotl(x86_fp80 %31, x86_fp80 %1)
ret x86_fp80 %32
33: ; preds = %33, %12
%34 = phi i64 [ 0, %12 ], [ %56, %33 ]
%35 = phi x86_fp80 [ %5, %12 ], [ %55, %33 ]
%36 = phi i64 [ 0, %12 ], [ %57, %33 ]
%37 = fadd x86_fp80 %35, 0xK3FFF8000000000000000
%38 = getelementptr inbounds x86_fp80, x86_fp80* %2, i64 %34
%39 = load x86_fp80, x86_fp80* %38
%40 = fmul x86_fp80 %37, %39
%41 = or i64 %34, 1
%42 = fadd x86_fp80 %40, 0xK3FFF8000000000000000
%43 = getelementptr inbounds x86_fp80, x86_fp80* %2, i64 %41
%44 = load x86_fp80, x86_fp80* %43
%45 = fmul x86_fp80 %42, %44
%46 = or i64 %34, 2
%47 = fadd x86_fp80 %45, 0xK3FFF8000000000000000
%48 = getelementptr inbounds x86_fp80, x86_fp80* %2, i64 %46
%49 = load x86_fp80, x86_fp80* %48
%50 = fmul x86_fp80 %47, %49
%51 = or i64 %34, 3
%52 = fadd x86_fp80 %50, 0xK3FFF8000000000000000
%53 = getelementptr inbounds x86_fp80, x86_fp80* %2, i64 %51
%54 = load x86_fp80, x86_fp80* %53
%55 = fmul x86_fp80 %52, %54
%56 = add nuw nsw i64 %34, 4
%57 = add i64 %36, 4
%58 = icmp eq i64 %57, %13
br i1 %58, label %14, label %33
}