long double pow_d(long double x, unsigned long exp) {
  long double base;
  if (!x && !exp)
    return -1;
  if (!exp || x == 1)
    return 1;
  else if (!x)
    return 0;
  else {
    base = x;
    while (--exp)
      x *= base;
  }
  return x;
}


x86 assembly (clang, -O0):
<pow_d>:
push   %rbp
mov    %rsp,%rbp
fldt   0x10(%rbp)
fstpt  -0x20(%rbp)
mov    %rdi,-0x28(%rbp)
fldt   -0x20(%rbp)
fldz
fxch   %st(1)
fucomip %st(1),%st
fstp   %st(0)
jne    1141 <pow_d+0x41>
jp     1141 <pow_d+0x41>
jmp    112a <pow_d+0x2a>
cmpq   $0x0,-0x28(%rbp)
jne    1141 <pow_d+0x41>
fld1
fchs
fstpt  -0x10(%rbp)
jmp    11d4 <pow_d+0xd4>
cmpq   $0x0,-0x28(%rbp)
je     1168 <pow_d+0x68>
fldt   -0x20(%rbp)
fld1
fxch   %st(1)
fucomip %st(1),%st
fstp   %st(0)
jne    1172 <pow_d+0x72>
jp     1172 <pow_d+0x72>
jmp    1168 <pow_d+0x68>
fld1
fstpt  -0x10(%rbp)
jmp    11d4 <pow_d+0xd4>
fldt   -0x20(%rbp)
fldz
fxch   %st(1)
fucomip %st(1),%st
fstp   %st(0)
jne    1198 <pow_d+0x98>
jp     1198 <pow_d+0x98>
jmp    118e <pow_d+0x8e>
fldz
fstpt  -0x10(%rbp)
jmp    11d4 <pow_d+0xd4>
fldt   -0x20(%rbp)
fstpt  -0x40(%rbp)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
cmp    $0x0,%rax
je     11c4 <pow_d+0xc4>
fldt   -0x40(%rbp)
fldt   -0x20(%rbp)
fmulp  %st,%st(1)
fstpt  -0x20(%rbp)
jmp    119e <pow_d+0x9e>
jmp    11c9 <pow_d+0xc9>
jmp    11ce <pow_d+0xce>
fldt   -0x20(%rbp)
fstpt  -0x10(%rbp)
fldt   -0x10(%rbp)
pop    %rbp
ret

x86 assembly (clang, -O2):
<pow_d>:
fldt   0x8(%rsp)
fldz
fxch   %st(1)
fucomi %st(1),%st
fld1
fld    %st(0)
fchs
jne    111d <pow_d+0x1d>
jp     111d <pow_d+0x1d>
test   %rdi,%rdi
je     11d2 <pow_d+0xd2>
fstp   %st(0)
test   %rdi,%rdi
sete   %al
fxch   %st(1)
fucomi %st(1),%st
setnp  %cl
sete   %dl
and    %cl,%dl
or     %al,%dl
fld    %st(2)
test   %dl,%dl
fcmovne %st(2),%st
fstp   %st(2)
jne    1188 <pow_d+0x88>
fucomi %st(2),%st
fldz
fxch   %st(1)
fxch   %st(2)
jne    114d <pow_d+0x4d>
jnp    11d2 <pow_d+0xd2>
fstp   %st(0)
fstp   %st(0)
mov    %rdi,%rax
add    $0xffffffffffffffff,%rax
je     118a <pow_d+0x8a>
add    $0xfffffffffffffffe,%rdi
mov    %rax,%rcx
and    $0x7,%rcx
je     1198 <pow_d+0x98>
fstp   %st(1)
xor    %edx,%edx
fld    %st(0)
nopl   (%rax)
fmul   %st(1),%st
add    $0x1,%rdx
cmp    %rdx,%rcx
jne    1170 <pow_d+0x70>
sub    %rdx,%rax
fld    %st(0)
fxch   %st(1)
fxch   %st(2)
fxch   %st(1)
jmp    119a <pow_d+0x9a>
fstp   %st(0)
fstp   %st(1)
fldz
fldz
fldz
fxch   %st(1)
fxch   %st(3)
jmp    11d2 <pow_d+0xd2>
fld    %st(0)
cmp    $0x7,%rdi
fldz
fxch   %st(3)
jb     11d2 <pow_d+0xd2>
fstp   %st(3)
fstp   %st(2)
fldz
fldz
fxch   %st(1)
fxch   %st(3)
fstp   %st(3)
fstp   %st(0)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
fmul   %st,%st(1)
add    $0xfffffffffffffff8,%rax
fldz
fldz
fxch   %st(1)
fxch   %st(3)
jne    11b0 <pow_d+0xb0>
fstp   %st(2)
fstp   %st(2)
fstp   %st(1)
ret

LLVM IR (-O0):
define x86_fp80 @pow_d(x86_fp80 %0, i64 %1) {
%3 = alloca x86_fp80
%4 = alloca x86_fp80
%5 = alloca i64
%6 = alloca x86_fp80
store x86_fp80 %0, x86_fp80* %4
store i64 %1, i64* %5
%7 = load x86_fp80, x86_fp80* %4
%8 = fcmp une x86_fp80 %7, 0xK00000000000000000000
br i1 %8, label %13, label %9
9: ; preds = %2
%10 = load i64, i64* %5
%11 = icmp ne i64 %10, 0
br i1 %11, label %13, label %12
12: ; preds = %9
store x86_fp80 0xKBFFF8000000000000000, x86_fp80* %3
br label %38
13: ; preds = %9, %2
%14 = load i64, i64* %5
%15 = icmp ne i64 %14, 0
br i1 %15, label %16, label %19
16: ; preds = %13
%17 = load x86_fp80, x86_fp80* %4
%18 = fcmp oeq x86_fp80 %17, 0xK3FFF8000000000000000
br i1 %18, label %19, label %20
19: ; preds = %16, %13
store x86_fp80 0xK3FFF8000000000000000, x86_fp80* %3
br label %38
20: ; preds = %16
%21 = load x86_fp80, x86_fp80* %4
%22 = fcmp une x86_fp80 %21, 0xK00000000000000000000
br i1 %22, label %24, label %23
23: ; preds = %20
store x86_fp80 0xK00000000000000000000, x86_fp80* %3
br label %38
24: ; preds = %20
%25 = load x86_fp80, x86_fp80* %4
store x86_fp80 %25, x86_fp80* %6
br label %26
26: ; preds = %30, %24
%27 = load i64, i64* %5
%28 = add i64 %27, -1
store i64 %28, i64* %5
%29 = icmp ne i64 %28, 0
br i1 %29, label %30, label %34
30: ; preds = %26
%31 = load x86_fp80, x86_fp80* %6
%32 = load x86_fp80, x86_fp80* %4
%33 = fmul x86_fp80 %32, %31
store x86_fp80 %33, x86_fp80* %4
br label %26
34: ; preds = %26
br label %35
35: ; preds = %34
br label %36
36: ; preds = %35
%37 = load x86_fp80, x86_fp80* %4
store x86_fp80 %37, x86_fp80* %3
br label %38
38: ; preds = %36, %23, %19, %12
%39 = load x86_fp80, x86_fp80* %3
ret x86_fp80 %39
}

LLVM IR (-O2):
define x86_fp80 @pow_d(x86_fp80 %0, i64 %1) {
%3 = fcmp une x86_fp80 %0, 0xK00000000000000000000
%4 = icmp ne i64 %1, 0
%5 = or i1 %3, %4
br i1 %5, label %6, label %46
6: ; preds = %2
%7 = icmp eq i64 %1, 0
%8 = fcmp oeq x86_fp80 %0, 0xK3FFF8000000000000000
%9 = or i1 %8, %7
%10 = xor i1 %3, true
%11 = or i1 %9, %10
%12 = select i1 %9, x86_fp80 0xK3FFF8000000000000000, x86_fp80 0xK00000000000000000000
br i1 %11, label %46, label %13
13: ; preds = %6
%14 = add i64 %1, -1
%15 = icmp eq i64 %14, 0
br i1 %15, label %46, label %16
16: ; preds = %13
%17 = add i64 %1, -2
%18 = and i64 %14, 7
%19 = icmp eq i64 %18, 0
br i1 %19, label %28, label %20
20: ; preds = %16, %20
%21 = phi i64 [ %25, %20 ], [ %14, %16 ]
%22 = phi x86_fp80 [ %24, %20 ], [ %0, %16 ]
%23 = phi i64 [ %26, %20 ], [ 0, %16 ]
%24 = fmul x86_fp80 %22, %0
%25 = add i64 %21, -1
%26 = add i64 %23, 1
%27 = icmp eq i64 %26, %18
br i1 %27, label %28, label %20
28: ; preds = %20, %16
%29 = phi x86_fp80 [ undef, %16 ], [ %24, %20 ]
%30 = phi i64 [ %14, %16 ], [ %25, %20 ]
%31 = phi x86_fp80 [ %0, %16 ], [ %24, %20 ]
%32 = icmp ult i64 %17, 7
br i1 %32, label %46, label %33
33: ; preds = %28, %33
%34 = phi i64 [ %44, %33 ], [ %30, %28 ]
%35 = phi x86_fp80 [ %43, %33 ], [ %31, %28 ]
%36 = fmul x86_fp80 %35, %0
%37 = fmul x86_fp80 %36, %0
%38 = fmul x86_fp80 %37, %0
%39 = fmul x86_fp80 %38, %0
%40 = fmul x86_fp80 %39, %0
%41 = fmul x86_fp80 %40, %0
%42 = fmul x86_fp80 %41, %0
%43 = fmul x86_fp80 %42, %0
%44 = add i64 %34, -8
%45 = icmp eq i64 %44, 0
br i1 %45, label %46, label %33
46: ; preds = %28, %33, %13, %6, %2
%47 = phi x86_fp80 [ 0xKBFFF8000000000000000, %2 ], [ %12, %6 ], [ %0, %13 ], [ %29, %28 ], [ %43, %33 ]
ret x86_fp80 %47
}