#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 make_tag(char *tag, int type, unsigned value) {
  char *p = tag;
  *p++ = 0x1f;
  *p++ = type;
  while (value >= 0x40) {
    *p++ = 0x80 + (value & 0x7f);
    value >>= 7;
  }
  *p++ = 0x40 + value;
  *p = 0;
  return p - tag;
}


x86 assembly (clang, -O0):
<make_tag>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x1f,(%rax)
mov    -0xc(%rbp),%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
cmpl   $0x40,-0x10(%rbp)
jb     1174 <make_tag+0x74>
mov    -0x10(%rbp),%eax
and    $0x7f,%eax
add    $0x80,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x10(%rbp),%eax
shr    $0x7,%eax
mov    %eax,-0x10(%rbp)
jmp    113e <make_tag+0x3e>
mov    -0x10(%rbp),%eax
add    $0x40,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x18(%rbp),%rax
mov    -0x8(%rbp),%rcx
sub    %rcx,%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<make_tag>:
movb   $0x1f,(%rdi)
lea    0x2(%rdi),%rcx
mov    %sil,0x1(%rdi)
cmp    $0x40,%edx
jb     1139 <make_tag+0x39>
mov    %edx,%esi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %edx,%eax
or     $0x80,%al
mov    %al,(%rcx)
add    $0x1,%rcx
shr    $0x7,%esi
cmp    $0x1fff,%edx
mov    %esi,%edx
ja     1120 <make_tag+0x20>
jmp    113b <make_tag+0x3b>
mov    %edx,%esi
add    $0x40,%sil
lea    0x1(%rcx),%rax
mov    %sil,(%rcx)
movb   $0x0,0x1(%rcx)
sub    %edi,%eax
ret

LLVM IR (-O0):
define i32 @make_tag(i8* %0, i32 %1, i32 %2) {
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i8*
store i8* %0, i8** %4
store i32 %1, i32* %5
store i32 %2, i32* %6
%8 = load i8*, i8** %4
store i8* %8, i8** %7
%9 = load i8*, i8** %7
%10 = getelementptr inbounds i8, i8* %9, i32 1
store i8* %10, i8** %7
store i8 31, i8* %9
%11 = load i32, i32* %5
%12 = trunc i32 %11 to i8
%13 = load i8*, i8** %7
%14 = getelementptr inbounds i8, i8* %13, i32 1
store i8* %14, i8** %7
store i8 %12, i8* %13
br label %15
15: ; preds = %18, %3
%16 = load i32, i32* %6
%17 = icmp uge i32 %16, 64
br i1 %17, label %18, label %27
18: ; preds = %15
%19 = load i32, i32* %6
%20 = and i32 %19, 127
%21 = add i32 128, %20
%22 = trunc i32 %21 to i8
%23 = load i8*, i8** %7
%24 = getelementptr inbounds i8, i8* %23, i32 1
store i8* %24, i8** %7
store i8 %22, i8* %23
%25 = load i32, i32* %6
%26 = lshr i32 %25, 7
store i32 %26, i32* %6
br label %15
27: ; preds = %15
%28 = load i32, i32* %6
%29 = add i32 64, %28
%30 = trunc i32 %29 to i8
%31 = load i8*, i8** %7
%32 = getelementptr inbounds i8, i8* %31, i32 1
store i8* %32, i8** %7
store i8 %30, i8* %31
%33 = load i8*, i8** %7
store i8 0, i8* %33
%34 = load i8*, i8** %7
%35 = load i8*, i8** %4
%36 = ptrtoint i8* %34 to i64
%37 = ptrtoint i8* %35 to i64
%38 = sub i64 %36, %37
%39 = trunc i64 %38 to i32
ret i32 %39
}

LLVM IR (-O2):
define i32 @make_tag(i8* %0, i32 %1, i32 %2) {
%4 = getelementptr inbounds i8, i8* %0, i64 1
store i8 31, i8* %0
%5 = trunc i32 %1 to i8
%6 = getelementptr inbounds i8, i8* %0, i64 2
store i8 %5, i8* %4
%7 = icmp ugt i32 %2, 63
br i1 %7, label %8, label %16
8: ; preds = %3, %8
%9 = phi i8* [ %13, %8 ], [ %6, %3 ]
%10 = phi i32 [ %14, %8 ], [ %2, %3 ]
%11 = trunc i32 %10 to i8
%12 = or i8 %11, -128
%13 = getelementptr inbounds i8, i8* %9, i64 1
store i8 %12, i8* %9
%14 = lshr i32 %10, 7
%15 = icmp ugt i32 %10, 8191
br i1 %15, label %8, label %16
16: ; preds = %8, %3
%17 = phi i32 [ %2, %3 ], [ %14, %8 ]
%18 = phi i8* [ %6, %3 ], [ %13, %8 ]
%19 = trunc i32 %17 to i8
%20 = add nuw nsw i8 %19, 64
%21 = getelementptr inbounds i8, i8* %18, i64 1
store i8 %20, i8* %18
store i8 0, i8* %21
%22 = ptrtoint i8* %21 to i64
%23 = ptrtoint i8* %0 to i64
%24 = sub i64 %22, %23
%25 = trunc i64 %24 to i32
ret i32 %25
}