#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 */
unsigned int gnulliver();
double gnulliver64f(double input64) {
  union {
    double x64;
    unsigned char ch[8];
  } bytes;
  static unsigned endian, init = 1;
  unsigned char tmpch;
  int i;
  if (init) {
    endian = gnulliver();
    init = 0;
  }
  bytes.x64 = input64;
  if (endian != 0) {
    if (endian == (1 | 2 | 4 | 8)) {
      tmpch = bytes.ch[0];
      bytes.ch[0] = bytes.ch[7];
      bytes.ch[7] = tmpch;
      tmpch = bytes.ch[1];
      bytes.ch[1] = bytes.ch[6];
      bytes.ch[6] = tmpch;
      tmpch = bytes.ch[2];
      bytes.ch[2] = bytes.ch[5];
      bytes.ch[5] = tmpch;
      tmpch = bytes.ch[3];
      bytes.ch[3] = bytes.ch[4];
      bytes.ch[4] = tmpch;
    } else {
      tmpch = bytes.ch[0];
      bytes.ch[0] = bytes.ch[6];
      bytes.ch[6] = tmpch;
      tmpch = bytes.ch[1];
      bytes.ch[1] = bytes.ch[7];
      bytes.ch[7] = tmpch;
      tmpch = bytes.ch[2];
      bytes.ch[2] = bytes.ch[4];
      bytes.ch[4] = tmpch;
      tmpch = bytes.ch[3];
      bytes.ch[3] = bytes.ch[5];
      bytes.ch[5] = tmpch;
    }
  }
  return (bytes.x64);
}


x86 assembly (clang, -O0):
<gnulliver64f>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
movsd  %xmm0,-0x8(%rbp)
cmpl   $0x0,0x2f04(%rip)
je     1141 <gnulliver64f+0x31>
mov    $0x0,%al
call   1030 <gnulliver@plt>
mov    %eax,0x2ef9(%rip)
movl   $0x0,0x2ee7(%rip)
movsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
cmpl   $0x0,0x2ede(%rip)
je     11ff <gnulliver64f+0xef>
cmpl   $0xf,0x2ed1(%rip)
jne    11b2 <gnulliver64f+0xa2>
mov    -0x10(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0x9(%rbp),%al
mov    %al,-0x10(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0x9(%rbp)
mov    -0xf(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xa(%rbp),%al
mov    %al,-0xf(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xa(%rbp)
mov    -0xe(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xb(%rbp),%al
mov    %al,-0xe(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xb(%rbp)
mov    -0xd(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xc(%rbp),%al
mov    %al,-0xd(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xc(%rbp)
jmp    11fa <gnulliver64f+0xea>
mov    -0x10(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xa(%rbp),%al
mov    %al,-0x10(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xa(%rbp)
mov    -0xf(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0x9(%rbp),%al
mov    %al,-0xf(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0x9(%rbp)
mov    -0xe(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xc(%rbp),%al
mov    %al,-0xe(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xc(%rbp)
mov    -0xd(%rbp),%al
mov    %al,-0x11(%rbp)
mov    -0xb(%rbp),%al
mov    %al,-0xd(%rbp)
mov    -0x11(%rbp),%al
mov    %al,-0xb(%rbp)
jmp    11ff <gnulliver64f+0xef>
movsd  -0x10(%rbp),%xmm0
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<gnulliver64f>:
push   %rax
cmpb   $0x0,0x2f18(%rip)
je     1126 <gnulliver64f+0x16>
mov    0x2f0c(%rip),%eax
test   %eax,%eax
jne    1148 <gnulliver64f+0x38>
pop    %rax
ret
xor    %eax,%eax
movsd  %xmm0,(%rsp)
call   1030 <gnulliver@plt>
movq   (%rsp),%xmm0
mov    %eax,0x2eef(%rip)
movb   $0x1,0x2eec(%rip)
test   %eax,%eax
je     1124 <gnulliver64f+0x14>
cmp    $0xf,%eax
jne    115c <gnulliver64f+0x4c>
movq   %xmm0,%rax
bswap  %rax
movq   %rax,%xmm0
pop    %rax
ret
movq   %xmm0,%rcx
mov    %rcx,%rax
shr    $0x30,%rax
mov    %rcx,%rdx
shl    $0x30,%rdx
or     %rax,%rdx
movabs $0xff0000000000ff,%r8
and    %rdx,%r8
mov    %rcx,%rsi
shr    $0x10,%rsi
mov    %esi,%r9d
and    $0xff0000,%r9d
shl    $0x10,%rcx
movabs $0xff00000000,%rax
and    %rcx,%rax
and    $0xff000000,%esi
movabs $0xff0000000000,%rdi
and    %rcx,%rdi
movabs $0xff0000000000ff00,%rcx
and    %rdx,%rcx
or     %r9,%rcx
or     %rax,%rcx
or     %rsi,%rcx
or     %rdi,%rcx
or     %r8,%rcx
movq   %rcx,%xmm0
pop    %rax
ret

LLVM IR (-O0):
%union.anon = type { double }
@gnulliver64f.endian = internal global i32 0
@gnulliver64f.init = internal global i32 1
define double @gnulliver64f(double %0) {
%2 = alloca double
%3 = alloca %union.anon
%4 = alloca i8
%5 = alloca i32
store double %0, double* %2
%6 = load i32, i32* @gnulliver64f.init
%7 = icmp ne i32 %6, 0
br i1 %7, label %8, label %10
8: ; preds = %1
%9 = call i32 (...) @gnulliver()
store i32 %9, i32* @gnulliver64f.endian
store i32 0, i32* @gnulliver64f.init
br label %10
10: ; preds = %8, %1
%11 = load double, double* %2
%12 = bitcast %union.anon* %3 to double*
store double %11, double* %12
%13 = load i32, i32* @gnulliver64f.endian
%14 = icmp ne i32 %13, 0
br i1 %14, label %15, label %109
15: ; preds = %10
%16 = load i32, i32* @gnulliver64f.endian
%17 = icmp eq i32 %16, 15
br i1 %17, label %18, label %63
18: ; preds = %15
%19 = bitcast %union.anon* %3 to [8 x i8]*
%20 = getelementptr inbounds [8 x i8], [8 x i8]* %19, i64 0, i64 0
%21 = load i8, i8* %20
store i8 %21, i8* %4
%22 = bitcast %union.anon* %3 to [8 x i8]*
%23 = getelementptr inbounds [8 x i8], [8 x i8]* %22, i64 0, i64 7
%24 = load i8, i8* %23
%25 = bitcast %union.anon* %3 to [8 x i8]*
%26 = getelementptr inbounds [8 x i8], [8 x i8]* %25, i64 0, i64 0
store i8 %24, i8* %26
%27 = load i8, i8* %4
%28 = bitcast %union.anon* %3 to [8 x i8]*
%29 = getelementptr inbounds [8 x i8], [8 x i8]* %28, i64 0, i64 7
store i8 %27, i8* %29
%30 = bitcast %union.anon* %3 to [8 x i8]*
%31 = getelementptr inbounds [8 x i8], [8 x i8]* %30, i64 0, i64 1
%32 = load i8, i8* %31
store i8 %32, i8* %4
%33 = bitcast %union.anon* %3 to [8 x i8]*
%34 = getelementptr inbounds [8 x i8], [8 x i8]* %33, i64 0, i64 6
%35 = load i8, i8* %34
%36 = bitcast %union.anon* %3 to [8 x i8]*
%37 = getelementptr inbounds [8 x i8], [8 x i8]* %36, i64 0, i64 1
store i8 %35, i8* %37
%38 = load i8, i8* %4
%39 = bitcast %union.anon* %3 to [8 x i8]*
%40 = getelementptr inbounds [8 x i8], [8 x i8]* %39, i64 0, i64 6
store i8 %38, i8* %40
%41 = bitcast %union.anon* %3 to [8 x i8]*
%42 = getelementptr inbounds [8 x i8], [8 x i8]* %41, i64 0, i64 2
%43 = load i8, i8* %42
store i8 %43, i8* %4
%44 = bitcast %union.anon* %3 to [8 x i8]*
%45 = getelementptr inbounds [8 x i8], [8 x i8]* %44, i64 0, i64 5
%46 = load i8, i8* %45
%47 = bitcast %union.anon* %3 to [8 x i8]*
%48 = getelementptr inbounds [8 x i8], [8 x i8]* %47, i64 0, i64 2
store i8 %46, i8* %48
%49 = load i8, i8* %4
%50 = bitcast %union.anon* %3 to [8 x i8]*
%51 = getelementptr inbounds [8 x i8], [8 x i8]* %50, i64 0, i64 5
store i8 %49, i8* %51
%52 = bitcast %union.anon* %3 to [8 x i8]*
%53 = getelementptr inbounds [8 x i8], [8 x i8]* %52, i64 0, i64 3
%54 = load i8, i8* %53
store i8 %54, i8* %4
%55 = bitcast %union.anon* %3 to [8 x i8]*
%56 = getelementptr inbounds [8 x i8], [8 x i8]* %55, i64 0, i64 4
%57 = load i8, i8* %56
%58 = bitcast %union.anon* %3 to [8 x i8]*
%59 = getelementptr inbounds [8 x i8], [8 x i8]* %58, i64 0, i64 3
store i8 %57, i8* %59
%60 = load i8, i8* %4
%61 = bitcast %union.anon* %3 to [8 x i8]*
%62 = getelementptr inbounds [8 x i8], [8 x i8]* %61, i64 0, i64 4
store i8 %60, i8* %62
br label %108
63: ; preds = %15
%64 = bitcast %union.anon* %3 to [8 x i8]*
%65 = getelementptr inbounds [8 x i8], [8 x i8]* %64, i64 0, i64 0
%66 = load i8, i8* %65
store i8 %66, i8* %4
%67 = bitcast %union.anon* %3 to [8 x i8]*
%68 = getelementptr inbounds [8 x i8], [8 x i8]* %67, i64 0, i64 6
%69 = load i8, i8* %68
%70 = bitcast %union.anon* %3 to [8 x i8]*
%71 = getelementptr inbounds [8 x i8], [8 x i8]* %70, i64 0, i64 0
store i8 %69, i8* %71
%72 = load i8, i8* %4
%73 = bitcast %union.anon* %3 to [8 x i8]*
%74 = getelementptr inbounds [8 x i8], [8 x i8]* %73, i64 0, i64 6
store i8 %72, i8* %74
%75 = bitcast %union.anon* %3 to [8 x i8]*
%76 = getelementptr inbounds [8 x i8], [8 x i8]* %75, i64 0, i64 1
%77 = load i8, i8* %76
store i8 %77, i8* %4
%78 = bitcast %union.anon* %3 to [8 x i8]*
%79 = getelementptr inbounds [8 x i8], [8 x i8]* %78, i64 0, i64 7
%80 = load i8, i8* %79
%81 = bitcast %union.anon* %3 to [8 x i8]*
%82 = getelementptr inbounds [8 x i8], [8 x i8]* %81, i64 0, i64 1
store i8 %80, i8* %82
%83 = load i8, i8* %4
%84 = bitcast %union.anon* %3 to [8 x i8]*
%85 = getelementptr inbounds [8 x i8], [8 x i8]* %84, i64 0, i64 7
store i8 %83, i8* %85
%86 = bitcast %union.anon* %3 to [8 x i8]*
%87 = getelementptr inbounds [8 x i8], [8 x i8]* %86, i64 0, i64 2
%88 = load i8, i8* %87
store i8 %88, i8* %4
%89 = bitcast %union.anon* %3 to [8 x i8]*
%90 = getelementptr inbounds [8 x i8], [8 x i8]* %89, i64 0, i64 4
%91 = load i8, i8* %90
%92 = bitcast %union.anon* %3 to [8 x i8]*
%93 = getelementptr inbounds [8 x i8], [8 x i8]* %92, i64 0, i64 2
store i8 %91, i8* %93
%94 = load i8, i8* %4
%95 = bitcast %union.anon* %3 to [8 x i8]*
%96 = getelementptr inbounds [8 x i8], [8 x i8]* %95, i64 0, i64 4
store i8 %94, i8* %96
%97 = bitcast %union.anon* %3 to [8 x i8]*
%98 = getelementptr inbounds [8 x i8], [8 x i8]* %97, i64 0, i64 3
%99 = load i8, i8* %98
store i8 %99, i8* %4
%100 = bitcast %union.anon* %3 to [8 x i8]*
%101 = getelementptr inbounds [8 x i8], [8 x i8]* %100, i64 0, i64 5
%102 = load i8, i8* %101
%103 = bitcast %union.anon* %3 to [8 x i8]*
%104 = getelementptr inbounds [8 x i8], [8 x i8]* %103, i64 0, i64 3
store i8 %102, i8* %104
%105 = load i8, i8* %4
%106 = bitcast %union.anon* %3 to [8 x i8]*
%107 = getelementptr inbounds [8 x i8], [8 x i8]* %106, i64 0, i64 5
store i8 %105, i8* %107
br label %108
108: ; preds = %63, %18
br label %109
109: ; preds = %108, %10
%110 = bitcast %union.anon* %3 to double*
%111 = load double, double* %110
ret double %111
}

LLVM IR (-O2):
@gnulliver64f.endian = internal unnamed_addr global i32 0
@gnulliver64f.init = internal unnamed_addr global i1 false
define double @gnulliver64f(double %0) {
%2 = load i1, i1* @gnulliver64f.init
br i1 %2, label %5, label %3
3: ; preds = %1
%4 = tail call i32 (...) @gnulliver()
store i32 %4, i32* @gnulliver64f.endian
store i1 true, i1* @gnulliver64f.init
br label %7
5: ; preds = %1
%6 = load i32, i32* @gnulliver64f.endian
br label %7
7: ; preds = %5, %3
%8 = phi i32 [ %6, %5 ], [ %4, %3 ]
switch i32 %8, label %13 [
i32 0, label %34
i32 15, label %9
]
9: ; preds = %7
%10 = bitcast double %0 to i64
%11 = tail call i64 @llvm.bswap.i64(i64 %10)
%12 = bitcast i64 %11 to double
br label %34
13: ; preds = %7
%14 = bitcast double %0 to i64
%15 = lshr i64 %14, 48
%16 = shl i64 %14, 48
%17 = and i64 %15, 65280
%18 = or i64 %15, %16
%19 = and i64 %16, -72057594037927936
%20 = and i64 %18, 71776119061217535
%21 = lshr i64 %14, 16
%22 = and i64 %21, 16711680
%23 = shl i64 %14, 16
%24 = and i64 %23, 1095216660480
%25 = and i64 %21, 4278190080
%26 = and i64 %23, 280375465082880
%27 = or i64 %19, %17
%28 = or i64 %27, %22
%29 = or i64 %28, %24
%30 = or i64 %29, %25
%31 = or i64 %30, %26
%32 = or i64 %31, %20
%33 = bitcast i64 %32 to double
br label %34
34: ; preds = %7, %9, %13
%35 = phi double [ %12, %9 ], [ %33, %13 ], [ %0, %7 ]
ret double %35
}