long intexpt(x, y)
long x, y;
{
  long z;
  if (y < 0)
    return (0L);
  z = 1L;
  while (y > 0)
    if (y & 1) {
      z *= x;
      y--;
    } else {
      y >>= 1;
      x *= x;
    };
  return (z);
}


x86 assembly (clang, -O0):
<intexpt>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jge    1124 <intexpt+0x24>
movq   $0x0,-0x8(%rbp)
jmp    118d <intexpt+0x8d>
movq   $0x1,-0x20(%rbp)
cmpq   $0x0,-0x18(%rbp)
jle    1185 <intexpt+0x85>
mov    -0x18(%rbp),%rax
and    $0x1,%rax
cmp    $0x0,%rax
je     1167 <intexpt+0x67>
mov    -0x10(%rbp),%rax
imul   -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x18(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x18(%rbp)
jmp    1180 <intexpt+0x80>
mov    -0x18(%rbp),%rax
sar    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
imul   -0x10(%rbp),%rax
mov    %rax,-0x10(%rbp)
jmp    112c <intexpt+0x2c>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<intexpt>:
test   %rsi,%rsi
js     1150 <intexpt+0x50>
je     1153 <intexpt+0x53>
mov    $0x1,%r8d
mov    $0x1,%eax
mov    %rsi,%rdx
cs nopw 0x0(%rax,%rax,1)
nop
lea    -0x1(%rsi),%rcx
shr    %rdx
test   $0x1,%sil
mov    $0x1,%esi
cmove  %rdi,%rsi
cmovne %rcx,%rdx
mov    %rdi,%rcx
cmove  %r8,%rcx
imul   %rsi,%rdi
imul   %rcx,%rax
mov    %rdx,%rsi
test   %rdx,%rdx
jne    1120 <intexpt+0x20>
ret
xor    %eax,%eax
ret
mov    $0x1,%eax
ret

LLVM IR (-O0):
define i64 @intexpt(i64 %0, i64 %1) {
%3 = alloca i64
%4 = alloca i64
%5 = alloca i64
%6 = alloca i64
store i64 %0, i64* %4
store i64 %1, i64* %5
%7 = load i64, i64* %5
%8 = icmp slt i64 %7, 0
br i1 %8, label %9, label %10
9: ; preds = %2
store i64 0, i64* %3
br label %33
10: ; preds = %2
store i64 1, i64* %6
br label %11
11: ; preds = %30, %10
%12 = load i64, i64* %5
%13 = icmp sgt i64 %12, 0
br i1 %13, label %14, label %31
14: ; preds = %11
%15 = load i64, i64* %5
%16 = and i64 %15, 1
%17 = icmp ne i64 %16, 0
br i1 %17, label %18, label %24
18: ; preds = %14
%19 = load i64, i64* %4
%20 = load i64, i64* %6
%21 = mul nsw i64 %20, %19
store i64 %21, i64* %6
%22 = load i64, i64* %5
%23 = add nsw i64 %22, -1
store i64 %23, i64* %5
br label %30
24: ; preds = %14
%25 = load i64, i64* %5
%26 = ashr i64 %25, 1
store i64 %26, i64* %5
%27 = load i64, i64* %4
%28 = load i64, i64* %4
%29 = mul nsw i64 %28, %27
store i64 %29, i64* %4
br label %30
30: ; preds = %24, %18
br label %11
31: ; preds = %11
%32 = load i64, i64* %6
store i64 %32, i64* %3
br label %33
33: ; preds = %31, %9
%34 = load i64, i64* %3
ret i64 %34
}

LLVM IR (-O2):
define i64 @intexpt(i64 %0, i64 %1) {
%3 = icmp slt i64 %1, 0
br i1 %3, label %20, label %4
4: ; preds = %2
%5 = icmp eq i64 %1, 0
br i1 %5, label %20, label %6
6: ; preds = %4, %6
%7 = phi i64 [ %18, %6 ], [ 1, %4 ]
%8 = phi i64 [ %16, %6 ], [ %1, %4 ]
%9 = phi i64 [ %15, %6 ], [ %0, %4 ]
%10 = and i64 %8, 1
%11 = icmp eq i64 %10, 0
%12 = add nsw i64 %8, -1
%13 = lshr i64 %8, 1
%14 = select i1 %11, i64 %9, i64 1
%15 = mul nsw i64 %14, %9
%16 = select i1 %11, i64 %13, i64 %12
%17 = select i1 %11, i64 1, i64 %9
%18 = mul nsw i64 %17, %7
%19 = icmp eq i64 %16, 0
br i1 %19, label %20, label %6
20: ; preds = %6, %4, %2
%21 = phi i64 [ 0, %2 ], [ 1, %4 ], [ %18, %6 ]
ret i64 %21
}