double pow_di(double *ap, int *bp) {
  double pow, x;
  int n;
  pow = 1;
  x = *ap;
  n = *bp;
  if (n != 0) {
    if (n < 0) {
      n = -n;
      x = 1 / x;
    }
    for (;;) {
      if (n & 01)
        pow *= x;
      if (n >>= 1)
        x *= x;
      else
        break;
    }
  }
  return (pow);
}


x86 assembly (clang, -O0):
<pow_di>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movsd  0xeec(%rip),%xmm0
movsd  %xmm0,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x0,-0x24(%rbp)
je     11b5 <pow_di+0xb5>
cmpl   $0x0,-0x24(%rbp)
jge    115d <pow_di+0x5d>
xor    %eax,%eax
sub    -0x24(%rbp),%eax
mov    %eax,-0x24(%rbp)
movsd  0xead(%rip),%xmm0
divsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
jmp    1162 <pow_di+0x62>
mov    -0x24(%rbp),%eax
and    $0x1,%eax
cmp    $0x0,%eax
je     1180 <pow_di+0x80>
movsd  -0x20(%rbp),%xmm0
mulsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x18(%rbp)
mov    -0x24(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x24(%rbp)
cmp    $0x0,%eax
je     11a6 <pow_di+0xa6>
movsd  -0x20(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
jmp    11ab <pow_di+0xab>
jmp    11b0 <pow_di+0xb0>
jmp    1162 <pow_di+0x62>
jmp    11b5 <pow_di+0xb5>
movsd  -0x18(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<pow_di>:
mov    (%rsi),%eax
test   %eax,%eax
je     111b <pow_di+0x1b>
movsd  (%rdi),%xmm1
js     1124 <pow_di+0x24>
test   $0x1,%al
je     113a <pow_di+0x3a>
movapd %xmm1,%xmm0
cmp    $0x2,%eax
jb     1147 <pow_di+0x47>
jmp    1148 <pow_di+0x48>
movsd  0xedd(%rip),%xmm0
ret
neg    %eax
movsd  0xed2(%rip),%xmm0
divsd  %xmm1,%xmm0
movapd %xmm0,%xmm1
test   $0x1,%al
jne    1110 <pow_di+0x10>
movsd  0xebe(%rip),%xmm0
cmp    $0x2,%eax
jae    1148 <pow_di+0x48>
ret
movsd  0xeb0(%rip),%xmm2
jmp    116f <pow_di+0x6f>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mulsd  %xmm3,%xmm0
mov    %eax,%ecx
sar    %ecx
cmp    $0x3,%eax
mov    %ecx,%eax
jbe    1147 <pow_di+0x47>
mulsd  %xmm1,%xmm1
movapd %xmm2,%xmm3
test   $0x2,%al
je     1160 <pow_di+0x60>
movapd %xmm1,%xmm3
jmp    1160 <pow_di+0x60>

LLVM IR (-O0):
define double @pow_di(double* %0, i32* %1) {
%3 = alloca double*
%4 = alloca i32*
%5 = alloca double
%6 = alloca double
%7 = alloca i32
store double* %0, double** %3
store i32* %1, i32** %4
store double 1.000000e+00, double* %5
%8 = load double*, double** %3
%9 = load double, double* %8
store double %9, double* %6
%10 = load i32*, i32** %4
%11 = load i32, i32* %10
store i32 %11, i32* %7
%12 = load i32, i32* %7
%13 = icmp ne i32 %12, 0
br i1 %13, label %14, label %42
14: ; preds = %2
%15 = load i32, i32* %7
%16 = icmp slt i32 %15, 0
br i1 %16, label %17, label %22
17: ; preds = %14
%18 = load i32, i32* %7
%19 = sub nsw i32 0, %18
store i32 %19, i32* %7
%20 = load double, double* %6
%21 = fdiv double 1.000000e+00, %20
store double %21, double* %6
br label %22
22: ; preds = %17, %14
br label %23
23: ; preds = %40, %22
%24 = load i32, i32* %7
%25 = and i32 %24, 1
%26 = icmp ne i32 %25, 0
br i1 %26, label %27, label %31
27: ; preds = %23
%28 = load double, double* %6
%29 = load double, double* %5
%30 = fmul double %29, %28
store double %30, double* %5
br label %31
31: ; preds = %27, %23
%32 = load i32, i32* %7
%33 = ashr i32 %32, 1
store i32 %33, i32* %7
%34 = icmp ne i32 %33, 0
br i1 %34, label %35, label %39
35: ; preds = %31
%36 = load double, double* %6
%37 = load double, double* %6
%38 = fmul double %37, %36
store double %38, double* %6
br label %40
39: ; preds = %31
br label %41
40: ; preds = %35
br label %23
41: ; preds = %39
br label %42
42: ; preds = %41, %2
%43 = load double, double* %5
ret double %43
}

LLVM IR (-O2):
define double @pow_di(double* nocapture %0, i32* nocapture %1) {
%3 = load double, double* %0
%4 = load i32, i32* %1
%5 = icmp eq i32 %4, 0
br i1 %5, label %29, label %6
6: ; preds = %2
%7 = icmp slt i32 %4, 0
br i1 %7, label %8, label %11
8: ; preds = %6
%9 = sub nsw i32 0, %4
%10 = fdiv double 1.000000e+00, %3
br label %11
11: ; preds = %8, %6
%12 = phi double [ %10, %8 ], [ %3, %6 ]
%13 = phi i32 [ %9, %8 ], [ %4, %6 ]
%14 = and i32 %13, 1
%15 = icmp eq i32 %14, 0
%16 = select i1 %15, double 1.000000e+00, double %12
%17 = icmp ult i32 %13, 2
br i1 %17, label %29, label %18
18: ; preds = %11, %18
%19 = phi double [ %27, %18 ], [ %16, %11 ]
%20 = phi i32 [ %22, %18 ], [ %13, %11 ]
%21 = phi double [ %23, %18 ], [ %12, %11 ]
%22 = ashr i32 %20, 1
%23 = fmul double %21, %21
%24 = and i32 %20, 2
%25 = icmp eq i32 %24, 0
%26 = select i1 %25, double 1.000000e+00, double %23
%27 = fmul double %19, %26
%28 = icmp ult i32 %20, 4
br i1 %28, label %29, label %18
29: ; preds = %18, %11, %2
%30 = phi double [ 1.000000e+00, %2 ], [ %16, %11 ], [ %27, %18 ]
ret double %30
}