#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ __gnat_last_chance_handler();
long long int __gnat_mulv64(long long int x, long long int y) {
  unsigned neg = (x >= 0) ^ (y >= 0);
  long long unsigned xa =
      x >= 0 ? (long long unsigned)x : -(long long unsigned)x;
  long long unsigned ya =
      y >= 0 ? (long long unsigned)y : -(long long unsigned)y;
  unsigned xhi = (unsigned)(xa >> 32);
  unsigned yhi = (unsigned)(ya >> 32);
  unsigned xlo = (unsigned)xa;
  unsigned ylo = (unsigned)ya;
  long long unsigned mid =
      xhi ? (long long unsigned)xhi * (long long unsigned)ylo
          : (long long unsigned)yhi * (long long unsigned)xlo;
  long long unsigned low = (long long unsigned)xlo * (long long unsigned)ylo;
  if ((xhi && yhi) || mid + (low >> 32) > 0x7fffffff + neg)
    __gnat_last_chance_handler();
  low += ((long long unsigned)(unsigned)mid) << 32;
  return (long long int)(neg ? -low : low);
}


x86 assembly (clang, -O0):
<__gnat_mulv64>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
cmpq   $0x0,-0x8(%rbp)
setge  %al
and    $0x1,%al
movzbl %al,%eax
cmpq   $0x0,-0x10(%rbp)
setge  %cl
and    $0x1,%cl
movzbl %cl,%ecx
xor    %ecx,%eax
mov    %eax,-0x14(%rbp)
cmpq   $0x0,-0x8(%rbp)
jl     1158 <__gnat_mulv64+0x48>
mov    -0x8(%rbp),%rax
mov    %rax,-0x50(%rbp)
jmp    1162 <__gnat_mulv64+0x52>
xor    %eax,%eax
sub    -0x8(%rbp),%rax
mov    %rax,-0x50(%rbp)
mov    -0x50(%rbp),%rax
mov    %rax,-0x20(%rbp)
cmpq   $0x0,-0x10(%rbp)
jl     1182 <__gnat_mulv64+0x72>
mov    -0x10(%rbp),%rax
mov    %rax,-0x58(%rbp)
jmp    118c <__gnat_mulv64+0x7c>
xor    %eax,%eax
sub    -0x10(%rbp),%rax
mov    %rax,-0x58(%rbp)
mov    -0x58(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
shr    $0x20,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x28(%rbp),%rax
shr    $0x20,%rax
mov    %eax,-0x30(%rbp)
mov    -0x20(%rbp),%rax
mov    %eax,-0x34(%rbp)
mov    -0x28(%rbp),%rax
mov    %eax,-0x38(%rbp)
cmpl   $0x0,-0x2c(%rbp)
je     11d5 <__gnat_mulv64+0xc5>
mov    -0x2c(%rbp),%eax
mov    -0x38(%rbp),%ecx
imul   %rcx,%rax
mov    %rax,-0x60(%rbp)
jmp    11e3 <__gnat_mulv64+0xd3>
mov    -0x30(%rbp),%eax
mov    -0x34(%rbp),%ecx
imul   %rcx,%rax
mov    %rax,-0x60(%rbp)
mov    -0x60(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x34(%rbp),%eax
mov    -0x38(%rbp),%ecx
imul   %rcx,%rax
mov    %rax,-0x48(%rbp)
cmpl   $0x0,-0x2c(%rbp)
je     120d <__gnat_mulv64+0xfd>
cmpl   $0x0,-0x30(%rbp)
jne    1230 <__gnat_mulv64+0x120>
mov    -0x40(%rbp),%rax
mov    -0x48(%rbp),%rcx
shr    $0x20,%rcx
add    %rcx,%rax
mov    -0x14(%rbp),%ecx
add    $0x7fffffff,%ecx
mov    %ecx,%ecx
cmp    %rcx,%rax
jbe    1237 <__gnat_mulv64+0x127>
mov    $0x0,%al
call   1030 <__gnat_last_chance_handler@plt>
mov    -0x40(%rbp),%rax
mov    %eax,%eax
shl    $0x20,%rax
add    -0x48(%rbp),%rax
mov    %rax,-0x48(%rbp)
cmpl   $0x0,-0x14(%rbp)
je     1262 <__gnat_mulv64+0x152>
xor    %eax,%eax
sub    -0x48(%rbp),%rax
mov    %rax,-0x68(%rbp)
jmp    126a <__gnat_mulv64+0x15a>
mov    -0x48(%rbp),%rax
mov    %rax,-0x68(%rbp)
mov    -0x68(%rbp),%rax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<__gnat_mulv64>:
push   %r15
push   %r14
push   %rbx
mov    %rsi,%r14
xor    %rdi,%r14
mov    %rdi,%rax
neg    %rax
cmovs  %rdi,%rax
mov    %rsi,%rcx
neg    %rcx
cmovs  %rsi,%rcx
mov    %rax,%rbx
shr    $0x20,%rbx
je     114d <__gnat_mulv64+0x3d>
mov    %ecx,%edx
imul   %rdx,%rbx
mov    %eax,%r15d
imul   %rdx,%r15
shr    $0x20,%rcx
je     115f <__gnat_mulv64+0x4f>
jmp    117b <__gnat_mulv64+0x6b>
mov    %rcx,%rbx
shr    $0x20,%rbx
imul   %rax,%rbx
mov    %ecx,%r15d
imul   %rax,%r15
mov    %r14,%rax
shr    $0x3f,%rax
mov    %r15,%rcx
shr    $0x20,%rcx
add    %rbx,%rcx
add    $0x7fffffff,%rax
cmp    %rax,%rcx
jbe    1182 <__gnat_mulv64+0x72>
xor    %eax,%eax
call   1030 <__gnat_last_chance_handler@plt>
shl    $0x20,%rbx
add    %r15,%rbx
mov    %rbx,%rax
neg    %rax
test   %r14,%r14
cmovns %rbx,%rax
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define i64 @__gnat_mulv64(i64 %0, i64 %1) {
%3 = alloca i64
%4 = alloca i64
%5 = alloca i32
%6 = alloca i64
%7 = alloca i64
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i64
%13 = alloca i64
store i64 %0, i64* %3
store i64 %1, i64* %4
%14 = load i64, i64* %3
%15 = icmp sge i64 %14, 0
%16 = zext i1 %15 to i32
%17 = load i64, i64* %4
%18 = icmp sge i64 %17, 0
%19 = zext i1 %18 to i32
%20 = xor i32 %16, %19
store i32 %20, i32* %5
%21 = load i64, i64* %3
%22 = icmp sge i64 %21, 0
br i1 %22, label %23, label %25
23: ; preds = %2
%24 = load i64, i64* %3
br label %28
25: ; preds = %2
%26 = load i64, i64* %3
%27 = sub i64 0, %26
br label %28
28: ; preds = %25, %23
%29 = phi i64 [ %24, %23 ], [ %27, %25 ]
store i64 %29, i64* %6
%30 = load i64, i64* %4
%31 = icmp sge i64 %30, 0
br i1 %31, label %32, label %34
32: ; preds = %28
%33 = load i64, i64* %4
br label %37
34: ; preds = %28
%35 = load i64, i64* %4
%36 = sub i64 0, %35
br label %37
37: ; preds = %34, %32
%38 = phi i64 [ %33, %32 ], [ %36, %34 ]
store i64 %38, i64* %7
%39 = load i64, i64* %6
%40 = lshr i64 %39, 32
%41 = trunc i64 %40 to i32
store i32 %41, i32* %8
%42 = load i64, i64* %7
%43 = lshr i64 %42, 32
%44 = trunc i64 %43 to i32
store i32 %44, i32* %9
%45 = load i64, i64* %6
%46 = trunc i64 %45 to i32
store i32 %46, i32* %10
%47 = load i64, i64* %7
%48 = trunc i64 %47 to i32
store i32 %48, i32* %11
%49 = load i32, i32* %8
%50 = icmp ne i32 %49, 0
br i1 %50, label %51, label %57
51: ; preds = %37
%52 = load i32, i32* %8
%53 = zext i32 %52 to i64
%54 = load i32, i32* %11
%55 = zext i32 %54 to i64
%56 = mul i64 %53, %55
br label %63
57: ; preds = %37
%58 = load i32, i32* %9
%59 = zext i32 %58 to i64
%60 = load i32, i32* %10
%61 = zext i32 %60 to i64
%62 = mul i64 %59, %61
br label %63
63: ; preds = %57, %51
%64 = phi i64 [ %56, %51 ], [ %62, %57 ]
store i64 %64, i64* %12
%65 = load i32, i32* %10
%66 = zext i32 %65 to i64
%67 = load i32, i32* %11
%68 = zext i32 %67 to i64
%69 = mul i64 %66, %68
store i64 %69, i64* %13
%70 = load i32, i32* %8
%71 = icmp ne i32 %70, 0
br i1 %71, label %72, label %75
72: ; preds = %63
%73 = load i32, i32* %9
%74 = icmp ne i32 %73, 0
br i1 %74, label %84, label %75
75: ; preds = %72, %63
%76 = load i64, i64* %12
%77 = load i64, i64* %13
%78 = lshr i64 %77, 32
%79 = add i64 %76, %78
%80 = load i32, i32* %5
%81 = add i32 2147483647, %80
%82 = zext i32 %81 to i64
%83 = icmp ugt i64 %79, %82
br i1 %83, label %84, label %86
84: ; preds = %75, %72
%85 = call i32 (...) @__gnat_last_chance_handler()
br label %86
86: ; preds = %84, %75
%87 = load i64, i64* %12
%88 = trunc i64 %87 to i32
%89 = zext i32 %88 to i64
%90 = shl i64 %89, 32
%91 = load i64, i64* %13
%92 = add i64 %91, %90
store i64 %92, i64* %13
%93 = load i32, i32* %5
%94 = icmp ne i32 %93, 0
br i1 %94, label %95, label %98
95: ; preds = %86
%96 = load i64, i64* %13
%97 = sub i64 0, %96
br label %100
98: ; preds = %86
%99 = load i64, i64* %13
br label %100
100: ; preds = %98, %95
%101 = phi i64 [ %97, %95 ], [ %99, %98 ]
ret i64 %101
}

LLVM IR (-O2):
define i64 @__gnat_mulv64(i64 %0, i64 %1) {
%3 = xor i64 %1, %0
%4 = lshr i64 %3, 63
%5 = tail call i64 @llvm.abs.i64(i64 %0, i1 false)
%6 = tail call i64 @llvm.abs.i64(i64 %1, i1 false)
%7 = icmp ugt i64 %5, 4294967295
br i1 %7, label %13, label %8
8: ; preds = %2
%9 = lshr i64 %6, 32
%10 = mul nuw nsw i64 %9, %5
%11 = and i64 %6, 4294967295
%12 = mul nuw i64 %11, %5
br label %20
13: ; preds = %2
%14 = lshr i64 %5, 32
%15 = and i64 %6, 4294967295
%16 = mul nuw nsw i64 %15, %14
%17 = and i64 %5, 4294967295
%18 = mul nuw i64 %15, %17
%19 = icmp ugt i64 %6, 4294967295
br i1 %19, label %27, label %20
20: ; preds = %8, %13
%21 = phi i64 [ %12, %8 ], [ %18, %13 ]
%22 = phi i64 [ %10, %8 ], [ %16, %13 ]
%23 = lshr i64 %21, 32
%24 = add nuw i64 %22, %23
%25 = add nuw nsw i64 %4, 2147483647
%26 = icmp ugt i64 %24, %25
br i1 %26, label %27, label %31
27: ; preds = %13, %20
%28 = phi i64 [ %18, %13 ], [ %21, %20 ]
%29 = phi i64 [ %16, %13 ], [ %22, %20 ]
%30 = tail call i32 (...) @__gnat_last_chance_handler()
br label %31
31: ; preds = %27, %20
%32 = phi i64 [ %28, %27 ], [ %21, %20 ]
%33 = phi i64 [ %29, %27 ], [ %22, %20 ]
%34 = shl i64 %33, 32
%35 = add i64 %34, %32
%36 = icmp sgt i64 %3, -1
%37 = sub i64 0, %35
%38 = select i1 %36, i64 %35, i64 %37
ret i64 %38
}