double ldexp(double v, int e) {
  double two = 2.0;
  if (e < 0) {
    e = -e;
    if (e < 0)
      return 0.0;
    while (e > 0) {
      if (e & 1)
        v /= two;
      two *= two;
      e >>= 1;
    }
  } else if (e > 0) {
    while (e > 0) {
      if (e & 1)
        v *= two;
      two *= two;
      e >>= 1;
    }
  }
  return v;
}


x86 assembly (clang, -O0):
<ldexp>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x10(%rbp)
mov    %edi,-0x14(%rbp)
movsd  0xeec(%rip),%xmm0
movsd  %xmm0,-0x20(%rbp)
cmpl   $0x0,-0x14(%rbp)
jge    1195 <ldexp+0x95>
xor    %eax,%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x0,-0x14(%rbp)
jge    1142 <ldexp+0x42>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    11fd <ldexp+0xfd>
jmp    1147 <ldexp+0x47>
cmpl   $0x0,-0x14(%rbp)
jle    1190 <ldexp+0x90>
mov    -0x14(%rbp),%eax
and    $0x1,%eax
cmp    $0x0,%eax
je     1173 <ldexp+0x73>
movsd  -0x20(%rbp),%xmm1
movsd  -0x10(%rbp),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x10(%rbp)
movsd  -0x20(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x14(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1147 <ldexp+0x47>
jmp    11f3 <ldexp+0xf3>
cmpl   $0x0,-0x14(%rbp)
jle    11ee <ldexp+0xee>
jmp    11a4 <ldexp+0xa4>
cmpl   $0x0,-0x14(%rbp)
jle    11e9 <ldexp+0xe9>
mov    -0x14(%rbp),%eax
and    $0x1,%eax
cmp    $0x0,%eax
je     11cc <ldexp+0xcc>
movsd  -0x20(%rbp),%xmm0
mulsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
movsd  -0x20(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x14(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11a4 <ldexp+0xa4>
jmp    11ee <ldexp+0xee>
jmp    11f3 <ldexp+0xf3>
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<ldexp>:
test   %edi,%edi
js     1143 <ldexp+0x43>
je     1183 <ldexp+0x83>
movsd  0xef2(%rip),%xmm1
movsd  0xef2(%rip),%xmm2
jmp    1133 <ldexp+0x33>
nopl   0x0(%rax,%rax,1)
mulsd  %xmm3,%xmm0
mulsd  %xmm1,%xmm1
mov    %edi,%eax
sar    %eax
cmp    $0x1,%edi
mov    %eax,%edi
jle    1183 <ldexp+0x83>
movapd %xmm2,%xmm3
test   $0x1,%dil
je     1120 <ldexp+0x20>
movapd %xmm1,%xmm3
jmp    1120 <ldexp+0x20>
neg    %edi
movsd  0xeb3(%rip),%xmm1
movsd  0xeb3(%rip),%xmm2
jmp    1173 <ldexp+0x73>
nopw   0x0(%rax,%rax,1)
divsd  %xmm3,%xmm0
mulsd  %xmm1,%xmm1
mov    %edi,%eax
shr    %eax
cmp    $0x2,%edi
mov    %eax,%edi
jb     1183 <ldexp+0x83>
movapd %xmm2,%xmm3
test   $0x1,%dil
je     1160 <ldexp+0x60>
movapd %xmm1,%xmm3
jmp    1160 <ldexp+0x60>
ret

LLVM IR (-O0):
define double @ldexp(double %0, i32 %1) {
%3 = alloca double
%4 = alloca double
%5 = alloca i32
%6 = alloca double
store double %0, double* %4
store i32 %1, i32* %5
store double 2.000000e+00, double* %6
%7 = load i32, i32* %5
%8 = icmp slt i32 %7, 0
br i1 %8, label %9, label %34
9: ; preds = %2
%10 = load i32, i32* %5
%11 = sub nsw i32 0, %10
store i32 %11, i32* %5
%12 = load i32, i32* %5
%13 = icmp slt i32 %12, 0
br i1 %13, label %14, label %15
14: ; preds = %9
store double 0.000000e+00, double* %3
br label %59
15: ; preds = %9
br label %16
16: ; preds = %27, %15
%17 = load i32, i32* %5
%18 = icmp sgt i32 %17, 0
br i1 %18, label %19, label %33
19: ; preds = %16
%20 = load i32, i32* %5
%21 = and i32 %20, 1
%22 = icmp ne i32 %21, 0
br i1 %22, label %23, label %27
23: ; preds = %19
%24 = load double, double* %6
%25 = load double, double* %4
%26 = fdiv double %25, %24
store double %26, double* %4
br label %27
27: ; preds = %23, %19
%28 = load double, double* %6
%29 = load double, double* %6
%30 = fmul double %29, %28
store double %30, double* %6
%31 = load i32, i32* %5
%32 = ashr i32 %31, 1
store i32 %32, i32* %5
br label %16
33: ; preds = %16
br label %57
34: ; preds = %2
%35 = load i32, i32* %5
%36 = icmp sgt i32 %35, 0
br i1 %36, label %37, label %56
37: ; preds = %34
br label %38
38: ; preds = %49, %37
%39 = load i32, i32* %5
%40 = icmp sgt i32 %39, 0
br i1 %40, label %41, label %55
41: ; preds = %38
%42 = load i32, i32* %5
%43 = and i32 %42, 1
%44 = icmp ne i32 %43, 0
br i1 %44, label %45, label %49
45: ; preds = %41
%46 = load double, double* %6
%47 = load double, double* %4
%48 = fmul double %47, %46
store double %48, double* %4
br label %49
49: ; preds = %45, %41
%50 = load double, double* %6
%51 = load double, double* %6
%52 = fmul double %51, %50
store double %52, double* %6
%53 = load i32, i32* %5
%54 = ashr i32 %53, 1
store i32 %54, i32* %5
br label %38
55: ; preds = %38
br label %56
56: ; preds = %55, %34
br label %57
57: ; preds = %56, %33
%58 = load double, double* %4
store double %58, double* %3
br label %59
59: ; preds = %57, %14
%60 = load double, double* %3
ret double %60
}

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