double dbl_raise(x, y)
double x;
int y;
{
  register int i;
  double val;
  val = 1.0;
  for (i = 0; i < abs(y); i++)
    val *= x;
  if (y < 0)
    return (1.0 / val);
  return (val);
}


x86 assembly (clang, -O0):
<dbl_raise>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movsd  %xmm0,-0x10(%rbp)
mov    %edi,-0x14(%rbp)
movsd  0xed8(%rip),%xmm0
movsd  %xmm0,-0x20(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x14(%rbp),%edi
call   1030 <abs@plt>
mov    %eax,%ecx
mov    -0x24(%rbp),%eax
cmp    %ecx,%eax
jge    116c <dbl_raise+0x5c>
movsd  -0x10(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1134 <dbl_raise+0x24>
cmpl   $0x0,-0x14(%rbp)
jge    118d <dbl_raise+0x7d>
movsd  0xe82(%rip),%xmm0
divsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1197 <dbl_raise+0x87>
movsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dbl_raise>:
test   %edi,%edi
je     1122 <dbl_raise+0x22>
mov    %edi,%ecx
neg    %ecx
cmovs  %edi,%ecx
lea    -0x1(%rcx),%edx
mov    %ecx,%eax
and    $0x7,%eax
cmp    $0x7,%edx
jae    112c <dbl_raise+0x2c>
movsd  0xee0(%rip),%xmm1
jmp    1165 <dbl_raise+0x65>
movsd  0xed6(%rip),%xmm1
jmp    1179 <dbl_raise+0x79>
and    $0x7ffffff8,%ecx
movsd  0xec6(%rip),%xmm1
nopw   0x0(%rax,%rax,1)
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
add    $0xfffffff8,%ecx
jne    1140 <dbl_raise+0x40>
test   %eax,%eax
je     1179 <dbl_raise+0x79>
nopl   0x0(%rax)
mulsd  %xmm0,%xmm1
add    $0xffffffff,%eax
jne    1170 <dbl_raise+0x70>
test   %edi,%edi
js     1182 <dbl_raise+0x82>
movapd %xmm1,%xmm0
ret
movsd  0xe76(%rip),%xmm0
divsd  %xmm1,%xmm0
movapd %xmm0,%xmm1
movapd %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @dbl_raise(double %0, i32 %1) {
%3 = alloca double
%4 = alloca double
%5 = alloca i32
%6 = alloca i32
%7 = alloca double
store double %0, double* %4
store i32 %1, i32* %5
store double 1.000000e+00, double* %7
store i32 0, i32* %6
br label %8
8: ; preds = %17, %2
%9 = load i32, i32* %6
%10 = load i32, i32* %5
%11 = call i32 @abs(i32 %10)
%12 = icmp slt i32 %9, %11
br i1 %12, label %13, label %20
13: ; preds = %8
%14 = load double, double* %4
%15 = load double, double* %7
%16 = fmul double %15, %14
store double %16, double* %7
br label %17
17: ; preds = %13
%18 = load i32, i32* %6
%19 = add nsw i32 %18, 1
store i32 %19, i32* %6
br label %8
20: ; preds = %8
%21 = load i32, i32* %5
%22 = icmp slt i32 %21, 0
br i1 %22, label %23, label %26
23: ; preds = %20
%24 = load double, double* %7
%25 = fdiv double 1.000000e+00, %24
store double %25, double* %3
br label %28
26: ; preds = %20
%27 = load double, double* %7
store double %27, double* %3
br label %28
28: ; preds = %26, %23
%29 = load double, double* %3
ret double %29
}

LLVM IR (-O2):
define double @dbl_raise(double %0, i32 %1) {
%3 = icmp eq i32 %1, 0
br i1 %3, label %34, label %4
4: ; preds = %2
%5 = tail call i32 @llvm.abs.i32(i32 %1, i1 true)
%6 = add nsw i32 %5, -1
%7 = and i32 %5, 7
%8 = icmp ult i32 %6, 7
br i1 %8, label %24, label %9
9: ; preds = %4
%10 = and i32 %5, 2147483640
br label %11
11: ; preds = %11, %9
%12 = phi double [ 1.000000e+00, %9 ], [ %21, %11 ]
%13 = phi i32 [ 0, %9 ], [ %22, %11 ]
%14 = fmul double %12, %0
%15 = fmul double %14, %0
%16 = fmul double %15, %0
%17 = fmul double %16, %0
%18 = fmul double %17, %0
%19 = fmul double %18, %0
%20 = fmul double %19, %0
%21 = fmul double %20, %0
%22 = add i32 %13, 8
%23 = icmp eq i32 %22, %10
br i1 %23, label %24, label %11
24: ; preds = %11, %4
%25 = phi double [ undef, %4 ], [ %21, %11 ]
%26 = phi double [ 1.000000e+00, %4 ], [ %21, %11 ]
%27 = icmp eq i32 %7, 0
br i1 %27, label %34, label %28
28: ; preds = %24, %28
%29 = phi double [ %31, %28 ], [ %26, %24 ]
%30 = phi i32 [ %32, %28 ], [ 0, %24 ]
%31 = fmul double %29, %0
%32 = add i32 %30, 1
%33 = icmp eq i32 %32, %7
br i1 %33, label %34, label %28
34: ; preds = %24, %28, %2
%35 = phi double [ 1.000000e+00, %2 ], [ %25, %24 ], [ %31, %28 ]
%36 = icmp slt i32 %1, 0
%37 = fdiv double 1.000000e+00, %35
%38 = select i1 %36, double %37, double %35
ret double %38
}