#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 */
typedef int uint8_t;
typedef int uint32_t;
typedef scalar_t__ int32_t;

/* Variables and functions */
int round(int);
int encode_double(double c, char *buf) {
  char *b = buf;
  uint32_t mask = 31;
  char chunks[6];
  uint32_t last_chunk = 0;
  uint32_t binary = round(1e5 * c);
  uint8_t i;
  binary <<= 1;
  if ((int32_t)binary < 0)
    binary = ~binary;
  for (i = 0; i < 6; ++i) {
    chunks[i] = (binary & mask) >> (5 * i);
    if (chunks[i] != 0)
      last_chunk = i;
    mask <<= 5;
  }
  for (i = 0; i <= last_chunk; ++i) {
    char out = chunks[i];
    if (i != last_chunk)
      out |= 0x20;
    out += 63;
    *(b++) = out;
  }
  *b = '\0';
  return (b - buf);
}


x86 assembly (clang, -O0):
<encode_double>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x18(%rbp)
movl   $0x1f,-0x1c(%rbp)
movl   $0x0,-0x28(%rbp)
movsd  0xec1(%rip),%xmm0
mulsd  -0x8(%rbp),%xmm0
cvttsd2si %xmm0,%edi
call   1030 <round@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x2c(%rbp)
movslq -0x2c(%rbp),%rax
cmp    $0x0,%rax
jge    1170 <encode_double+0x60>
mov    -0x2c(%rbp),%eax
xor    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
movl   $0x0,-0x30(%rbp)
cmpl   $0x6,-0x30(%rbp)
jge    11c6 <encode_double+0xb6>
mov    -0x2c(%rbp),%eax
and    -0x1c(%rbp),%eax
imul   $0x5,-0x30(%rbp),%ecx
sar    %cl,%eax
mov    %al,%cl
movslq -0x30(%rbp),%rax
mov    %cl,-0x22(%rbp,%rax,1)
movslq -0x30(%rbp),%rax
movsbl -0x22(%rbp,%rax,1),%eax
cmp    $0x0,%eax
je     11af <encode_double+0x9f>
mov    -0x30(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x5,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1177 <encode_double+0x67>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x28(%rbp),%eax
jg     1226 <encode_double+0x116>
movslq -0x30(%rbp),%rax
mov    -0x22(%rbp,%rax,1),%al
mov    %al,-0x31(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x28(%rbp),%eax
je     11fa <encode_double+0xea>
movsbl -0x31(%rbp),%eax
or     $0x20,%eax
mov    %al,-0x31(%rbp)
movsbl -0x31(%rbp),%eax
add    $0x3f,%eax
mov    %al,-0x31(%rbp)
mov    -0x31(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11cd <encode_double+0xbd>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x18(%rbp),%rax
mov    -0x10(%rbp),%rcx
sub    %rcx,%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<encode_double>:
push   %r14
push   %rbx
push   %rax
mov    %rdi,%r14
mulsd  0xee1(%rip),%xmm0
cvttsd2si %xmm0,%edi
call   1030 <round@plt>
add    %eax,%eax
mov    %eax,%ecx
sar    $0x1f,%ecx
xor    %eax,%ecx
mov    %ecx,%r9d
and    $0x1f,%r9b
mov    %ecx,%r10d
shr    $0x5,%r10d
xor    %eax,%eax
and    $0x1f,%r10d
setne  %al
mov    %ecx,%esi
shr    $0xa,%esi
and    $0x1f,%esi
mov    $0x2,%edi
cmove  %eax,%edi
mov    %ecx,%ebx
shr    $0xf,%ebx
and    $0x1f,%ebx
mov    $0x3,%edx
cmove  %edi,%edx
mov    %ecx,%eax
shr    $0x14,%eax
and    $0x1f,%eax
mov    $0x4,%edi
cmove  %edx,%edi
shr    $0x19,%ecx
and    $0x1f,%ecx
mov    $0x5,%r8d
cmove  %edi,%r8d
lea    0x20(%r9),%edx
test   %r8d,%r8d
movzbl %r9b,%edi
movzbl %dl,%edx
cmove  %edi,%edx
add    $0x3f,%dl
mov    %dil,0x2(%rsp)
mov    %r10b,0x3(%rsp)
mov    %sil,0x4(%rsp)
mov    %bl,0x5(%rsp)
mov    %al,0x6(%rsp)
mov    %cl,0x7(%rsp)
mov    %dl,(%r14)
test   %r8d,%r8d
je     11ec <encode_double+0xdc>
movzbl 0x3(%rsp),%eax
mov    %eax,%ecx
or     $0x20,%cl
cmp    $0x1,%r8d
movzbl %cl,%edx
cmove  %eax,%edx
lea    0x1(%r8),%ecx
add    $0x3f,%dl
mov    %dl,0x1(%r14)
cmp    $0x2,%ecx
jne    11f5 <encode_double+0xe5>
lea    0x2(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
lea    0x1(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
movzbl 0x4(%rsp),%eax
mov    %eax,%edx
or     $0x20,%dl
cmp    $0x2,%r8d
movzbl %dl,%edx
cmove  %eax,%edx
add    $0x3f,%dl
mov    %dl,0x2(%r14)
cmp    $0x3,%ecx
jne    121e <encode_double+0x10e>
lea    0x3(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
movzbl 0x5(%rsp),%eax
mov    %eax,%edx
or     $0x20,%dl
cmp    $0x3,%r8d
movzbl %dl,%edx
cmove  %eax,%edx
add    $0x3f,%dl
mov    %dl,0x3(%r14)
cmp    $0x4,%ecx
jne    1244 <encode_double+0x134>
lea    0x4(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
movzbl 0x6(%rsp),%eax
mov    %eax,%edx
or     $0x20,%dl
cmp    $0x4,%r8d
movzbl %dl,%edx
cmove  %eax,%edx
add    $0x3f,%dl
mov    %dl,0x4(%r14)
cmp    $0x5,%ecx
jne    126a <encode_double+0x15a>
lea    0x5(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
movzbl 0x7(%rsp),%eax
mov    %eax,%edx
or     $0x20,%dl
cmp    $0x5,%r8d
movzbl %dl,%edx
cmove  %eax,%edx
add    $0x3f,%dl
mov    %dl,0x5(%r14)
cmp    $0x6,%ecx
jne    1290 <encode_double+0x180>
lea    0x6(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
mov    0x8(%rsp),%al
or     $0x20,%al
add    $0x3f,%al
mov    %al,0x6(%r14)
cmp    $0x7,%ecx
jne    12a7 <encode_double+0x197>
lea    0x7(%r14),%rax
jmp    12b9 <encode_double+0x1a9>
mov    0x9(%rsp),%cl
or     $0x20,%cl
add    $0x3f,%cl
lea    0x8(%r14),%rax
mov    %cl,0x7(%r14)
movb   $0x0,(%rax)
sub    %r14d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
define i32 @encode_double(double %0, i8* %1) {
%3 = alloca double
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i32
%7 = alloca [6 x i8]
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i8
store double %0, double* %3
store i8* %1, i8** %4
%12 = load i8*, i8** %4
store i8* %12, i8** %5
store i32 31, i32* %6
store i32 0, i32* %8
%13 = load double, double* %3
%14 = fmul double 1.000000e+05, %13
%15 = fptosi double %14 to i32
%16 = call i32 @round(i32 %15)
store i32 %16, i32* %9
%17 = load i32, i32* %9
%18 = shl i32 %17, 1
store i32 %18, i32* %9
%19 = load i32, i32* %9
%20 = sext i32 %19 to i64
%21 = icmp slt i64 %20, 0
br i1 %21, label %22, label %25
22: ; preds = %2
%23 = load i32, i32* %9
%24 = xor i32 %23, -1
store i32 %24, i32* %9
br label %25
25: ; preds = %22, %2
store i32 0, i32* %10
br label %26
26: ; preds = %51, %25
%27 = load i32, i32* %10
%28 = icmp slt i32 %27, 6
br i1 %28, label %29, label %54
29: ; preds = %26
%30 = load i32, i32* %9
%31 = load i32, i32* %6
%32 = and i32 %30, %31
%33 = load i32, i32* %10
%34 = mul nsw i32 5, %33
%35 = ashr i32 %32, %34
%36 = trunc i32 %35 to i8
%37 = load i32, i32* %10
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds [6 x i8], [6 x i8]* %7, i64 0, i64 %38
store i8 %36, i8* %39
%40 = load i32, i32* %10
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds [6 x i8], [6 x i8]* %7, i64 0, i64 %41
%43 = load i8, i8* %42
%44 = sext i8 %43 to i32
%45 = icmp ne i32 %44, 0
br i1 %45, label %46, label %48
46: ; preds = %29
%47 = load i32, i32* %10
store i32 %47, i32* %8
br label %48
48: ; preds = %46, %29
%49 = load i32, i32* %6
%50 = shl i32 %49, 5
store i32 %50, i32* %6
br label %51
51: ; preds = %48
%52 = load i32, i32* %10
%53 = add nsw i32 %52, 1
store i32 %53, i32* %10
br label %26
54: ; preds = %26
store i32 0, i32* %10
br label %55
55: ; preds = %80, %54
%56 = load i32, i32* %10
%57 = load i32, i32* %8
%58 = icmp sle i32 %56, %57
br i1 %58, label %59, label %83
59: ; preds = %55
%60 = load i32, i32* %10
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds [6 x i8], [6 x i8]* %7, i64 0, i64 %61
%63 = load i8, i8* %62
store i8 %63, i8* %11
%64 = load i32, i32* %10
%65 = load i32, i32* %8
%66 = icmp ne i32 %64, %65
br i1 %66, label %67, label %72
67: ; preds = %59
%68 = load i8, i8* %11
%69 = sext i8 %68 to i32
%70 = or i32 %69, 32
%71 = trunc i32 %70 to i8
store i8 %71, i8* %11
br label %72
72: ; preds = %67, %59
%73 = load i8, i8* %11
%74 = sext i8 %73 to i32
%75 = add nsw i32 %74, 63
%76 = trunc i32 %75 to i8
store i8 %76, i8* %11
%77 = load i8, i8* %11
%78 = load i8*, i8** %5
%79 = getelementptr inbounds i8, i8* %78, i32 1
store i8* %79, i8** %5
store i8 %77, i8* %78
br label %80
80: ; preds = %72
%81 = load i32, i32* %10
%82 = add nsw i32 %81, 1
store i32 %82, i32* %10
br label %55
83: ; preds = %55
%84 = load i8*, i8** %5
store i8 0, i8* %84
%85 = load i8*, i8** %5
%86 = load i8*, i8** %4
%87 = ptrtoint i8* %85 to i64
%88 = ptrtoint i8* %86 to i64
%89 = sub i64 %87, %88
%90 = trunc i64 %89 to i32
ret i32 %90
}

LLVM IR (-O2):
define i32 @encode_double(double %0, i8* %1) {
%3 = alloca [6 x i8]
%4 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 0
%5 = fmul double %0, 1.000000e+05
%6 = fptosi double %5 to i32
%7 = tail call i32 @round(i32 %6)
%8 = shl i32 %7, 1
%9 = ashr i32 %8, 31
%10 = xor i32 %9, %8
%11 = trunc i32 %10 to i8
%12 = and i8 %11, 31
store i8 %12, i8* %4
%13 = lshr i32 %10, 5
%14 = and i32 %13, 31
%15 = trunc i32 %14 to i8
%16 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 1
store i8 %15, i8* %16
%17 = icmp ne i32 %14, 0
%18 = zext i1 %17 to i32
%19 = lshr i32 %10, 10
%20 = and i32 %19, 31
%21 = trunc i32 %20 to i8
%22 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 2
store i8 %21, i8* %22
%23 = icmp eq i32 %20, 0
%24 = select i1 %23, i32 %18, i32 2
%25 = lshr i32 %10, 15
%26 = and i32 %25, 31
%27 = trunc i32 %26 to i8
%28 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 3
store i8 %27, i8* %28
%29 = icmp eq i32 %26, 0
%30 = select i1 %29, i32 %24, i32 3
%31 = lshr i32 %10, 20
%32 = and i32 %31, 31
%33 = trunc i32 %32 to i8
%34 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 4
store i8 %33, i8* %34
%35 = icmp eq i32 %32, 0
%36 = select i1 %35, i32 %30, i32 4
%37 = lshr i32 %10, 25
%38 = and i32 %37, 31
%39 = trunc i32 %38 to i8
%40 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 5
store i8 %39, i8* %40
%41 = icmp eq i32 %38, 0
%42 = select i1 %41, i32 %36, i32 5
%43 = add nuw nsw i32 %42, 1
%44 = icmp eq i32 %42, 0
%45 = or i8 %12, 32
%46 = select i1 %44, i8 %12, i8 %45
%47 = add nuw nsw i8 %46, 63
%48 = getelementptr inbounds i8, i8* %1, i64 1
store i8 %47, i8* %1
%49 = icmp eq i32 %42, 0
br i1 %49, label %108, label %50
50: ; preds = %2
%51 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 1
%52 = load i8, i8* %51
%53 = icmp eq i32 %42, 1
%54 = or i8 %52, 32
%55 = select i1 %53, i8 %52, i8 %54
%56 = add i8 %55, 63
%57 = getelementptr inbounds i8, i8* %1, i64 2
store i8 %56, i8* %48
%58 = icmp eq i32 %43, 2
br i1 %58, label %108, label %59
59: ; preds = %50
%60 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 2
%61 = load i8, i8* %60
%62 = icmp eq i32 %42, 2
%63 = or i8 %61, 32
%64 = select i1 %62, i8 %61, i8 %63
%65 = add i8 %64, 63
%66 = getelementptr inbounds i8, i8* %1, i64 3
store i8 %65, i8* %57
%67 = icmp eq i32 %43, 3
br i1 %67, label %108, label %68
68: ; preds = %59
%69 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 3
%70 = load i8, i8* %69
%71 = icmp eq i32 %42, 3
%72 = or i8 %70, 32
%73 = select i1 %71, i8 %70, i8 %72
%74 = add i8 %73, 63
%75 = getelementptr inbounds i8, i8* %1, i64 4
store i8 %74, i8* %66
%76 = icmp eq i32 %43, 4
br i1 %76, label %108, label %77
77: ; preds = %68
%78 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 4
%79 = load i8, i8* %78
%80 = icmp eq i32 %42, 4
%81 = or i8 %79, 32
%82 = select i1 %80, i8 %79, i8 %81
%83 = add i8 %82, 63
%84 = getelementptr inbounds i8, i8* %1, i64 5
store i8 %83, i8* %75
%85 = icmp eq i32 %43, 5
br i1 %85, label %108, label %86
86: ; preds = %77
%87 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 5
%88 = load i8, i8* %87
%89 = icmp eq i32 %42, 5
%90 = or i8 %88, 32
%91 = select i1 %89, i8 %88, i8 %90
%92 = add i8 %91, 63
%93 = getelementptr inbounds i8, i8* %1, i64 6
store i8 %92, i8* %84
%94 = icmp eq i32 %43, 6
br i1 %94, label %108, label %95
95: ; preds = %86
%96 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 6
%97 = load i8, i8* %96
%98 = or i8 %97, 32
%99 = add i8 %98, 63
%100 = getelementptr inbounds i8, i8* %1, i64 7
store i8 %99, i8* %93
%101 = icmp eq i32 %43, 7
br i1 %101, label %108, label %102
102: ; preds = %95
%103 = getelementptr inbounds [6 x i8], [6 x i8]* %3, i64 0, i64 7
%104 = load i8, i8* %103
%105 = or i8 %104, 32
%106 = add i8 %105, 63
%107 = getelementptr inbounds i8, i8* %1, i64 8
store i8 %106, i8* %100
br label %108
108: ; preds = %50, %59, %68, %77, %86, %95, %102, %2
%109 = phi i8* [ %48, %2 ], [ %57, %50 ], [ %66, %59 ], [ %75, %68 ], [ %84, %77 ], [ %93, %86 ], [ %100, %95 ], [ %107, %102 ]
store i8 0, i8* %109
%110 = ptrtoint i8* %109 to i64
%111 = ptrtoint i8* %1 to i64
%112 = sub i64 %110, %111
%113 = trunc i64 %112 to i32
ret i32 %113
}