#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 */
char *malloc(int);
char *idris_utf8_fromChar(int x) {
  char *str;
  int bytes = 0, top = 0;
  if ((x & 0x80) == 0) {
    str = malloc(2);
    str[0] = (char)x;
    str[1] = '\0';
    return str;
  }
  if (x >= 0x80 && x <= 0x7ff) {
    bytes = 2;
    top = 0xc0;
  } else if (x >= 0x800 && x <= 0xffff) {
    bytes = 3;
    top = 0xe0;
  } else if (x >= 0x10000 && x <= 0x10ffff) {
    bytes = 4;
    top = 0xf0;
  }
  str = malloc(bytes + 1);
  str[bytes] = '\0';
  while (bytes > 0) {
    int xbits = x & 0x3f;
    bytes--;
    if (bytes > 0) {
      str[bytes] = (char)xbits + 0x80;
    } else {
      str[0] = (char)xbits + top;
    }
    x = x >> 6;
  }
  return str;
}


x86 assembly (clang, -O0):
<idris_utf8_fromChar>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0xc(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0xc(%rbp),%eax
and    $0x80,%eax
cmp    $0x0,%eax
jne    1168 <idris_utf8_fromChar+0x58>
mov    $0x2,%edi
call   1030 <malloc@plt>
mov    %rax,-0x18(%rbp)
mov    -0xc(%rbp),%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0x18(%rbp),%rax
movb   $0x0,0x1(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1279 <idris_utf8_fromChar+0x169>
cmpl   $0x80,-0xc(%rbp)
jl     1195 <idris_utf8_fromChar+0x85>
cmpl   $0x7ff,-0xc(%rbp)
jg     1195 <idris_utf8_fromChar+0x85>
movl   $0x2,-0x1c(%rbp)
movl   $0xc0,-0x20(%rbp)
jmp    11f4 <idris_utf8_fromChar+0xe4>
cmpl   $0x800,-0xc(%rbp)
jl     11c2 <idris_utf8_fromChar+0xb2>
cmpl   $0xffff,-0xc(%rbp)
jg     11c2 <idris_utf8_fromChar+0xb2>
movl   $0x3,-0x1c(%rbp)
movl   $0xe0,-0x20(%rbp)
jmp    11ef <idris_utf8_fromChar+0xdf>
cmpl   $0x10000,-0xc(%rbp)
jl     11ea <idris_utf8_fromChar+0xda>
cmpl   $0x10ffff,-0xc(%rbp)
jg     11ea <idris_utf8_fromChar+0xda>
movl   $0x4,-0x1c(%rbp)
movl   $0xf0,-0x20(%rbp)
jmp    11ef <idris_utf8_fromChar+0xdf>
jmp    11f4 <idris_utf8_fromChar+0xe4>
mov    -0x1c(%rbp),%edi
add    $0x1,%edi
call   1030 <malloc@plt>
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
cmpl   $0x0,-0x1c(%rbp)
jle    1271 <idris_utf8_fromChar+0x161>
mov    -0xc(%rbp),%eax
and    $0x3f,%eax
mov    %eax,-0x24(%rbp)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jle    1252 <idris_utf8_fromChar+0x142>
mov    -0x24(%rbp),%eax
movsbl %al,%eax
add    $0x80,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    1263 <idris_utf8_fromChar+0x153>
mov    -0x24(%rbp),%eax
movsbl %al,%eax
add    -0x20(%rbp),%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0xc(%rbp),%eax
sar    $0x6,%eax
mov    %eax,-0xc(%rbp)
jmp    120f <idris_utf8_fromChar+0xff>
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<idris_utf8_fromChar>:
push   %rbp
push   %r14
push   %rbx
mov    %edi,%ebx
test   $0x80,%bl
jne    1130 <idris_utf8_fromChar+0x20>
mov    $0x2,%edi
call   1030 <malloc@plt>
mov    %bl,(%rax)
movb   $0x0,0x1(%rax)
jmp    11f5 <idris_utf8_fromChar+0xe5>
lea    -0x80(%rbx),%eax
cmp    $0x780,%eax
jae    1147 <idris_utf8_fromChar+0x37>
mov    $0xc0,%r14d
mov    $0x2,%ebp
jmp    1181 <idris_utf8_fromChar+0x71>
lea    -0x800(%rbx),%eax
cmp    $0xf800,%eax
jae    1161 <idris_utf8_fromChar+0x51>
mov    $0xe0,%r14d
mov    $0x3,%ebp
jmp    1181 <idris_utf8_fromChar+0x71>
lea    -0x10000(%rbx),%eax
xor    %ecx,%ecx
xor    %ebp,%ebp
cmp    $0x100000,%eax
setb   %bpl
mov    $0xf0,%r14d
cmovae %ecx,%r14d
shl    $0x2,%ebp
lea    0x1(%rbp),%edi
call   1030 <malloc@plt>
mov    %ebp,%ecx
movb   $0x0,(%rax,%rcx,1)
test   %ebp,%ebp
je     11f5 <idris_utf8_fromChar+0xe5>
lea    -0x1(%rcx),%rsi
mov    %ebx,%edx
and    $0x3f,%dl
or     $0x80,%dl
mov    %dl,-0x1(%rax,%rcx,1)
test   %rsi,%rsi
je     11f5 <idris_utf8_fromChar+0xe5>
mov    %ebx,%edx
shr    $0x6,%edx
and    $0x3f,%edx
cmp    $0x1,%rsi
je     11f0 <idris_utf8_fromChar+0xe0>
lea    -0x2(%rcx),%rsi
or     $0x80,%dl
mov    %dl,(%rax,%rsi,1)
test   %rsi,%rsi
je     11f5 <idris_utf8_fromChar+0xe5>
mov    %ebx,%edx
shr    $0xc,%edx
and    $0x3f,%edx
cmp    $0x1,%rsi
je     11f0 <idris_utf8_fromChar+0xe0>
lea    -0x3(%rcx),%rsi
or     $0x80,%dl
mov    %dl,(%rax,%rsi,1)
test   %rsi,%rsi
je     11f5 <idris_utf8_fromChar+0xe5>
shr    $0x12,%ebx
mov    %ebx,%edx
and    $0x3f,%edx
cmp    $0x1,%rsi
jne    11fa <idris_utf8_fromChar+0xea>
add    %r14d,%edx
mov    %dl,(%rax)
pop    %rbx
pop    %r14
pop    %rbp
ret
or     $0x80,%dl
mov    %dl,-0x4(%rcx,%rax,1)
jmp    11f5 <idris_utf8_fromChar+0xe5>

LLVM IR (-O0):
define i8* @idris_utf8_fromChar(i32 %0) {
%2 = alloca i8*
%3 = alloca i32
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
store i32 %0, i32* %3
store i32 0, i32* %5
store i32 0, i32* %6
%8 = load i32, i32* %3
%9 = and i32 %8, 128
%10 = icmp eq i32 %9, 0
br i1 %10, label %11, label %20
11: ; preds = %1
%12 = call i8* @malloc(i32 2)
store i8* %12, i8** %4
%13 = load i32, i32* %3
%14 = trunc i32 %13 to i8
%15 = load i8*, i8** %4
%16 = getelementptr inbounds i8, i8* %15, i64 0
store i8 %14, i8* %16
%17 = load i8*, i8** %4
%18 = getelementptr inbounds i8, i8* %17, i64 1
store i8 0, i8* %18
%19 = load i8*, i8** %4
store i8* %19, i8** %2
br label %85
20: ; preds = %1
%21 = load i32, i32* %3
%22 = icmp sge i32 %21, 128
br i1 %22, label %23, label %27
23: ; preds = %20
%24 = load i32, i32* %3
%25 = icmp sle i32 %24, 2047
br i1 %25, label %26, label %27
26: ; preds = %23
store i32 2, i32* %5
store i32 192, i32* %6
br label %43
27: ; preds = %23, %20
%28 = load i32, i32* %3
%29 = icmp sge i32 %28, 2048
br i1 %29, label %30, label %34
30: ; preds = %27
%31 = load i32, i32* %3
%32 = icmp sle i32 %31, 65535
br i1 %32, label %33, label %34
33: ; preds = %30
store i32 3, i32* %5
store i32 224, i32* %6
br label %42
34: ; preds = %30, %27
%35 = load i32, i32* %3
%36 = icmp sge i32 %35, 65536
br i1 %36, label %37, label %41
37: ; preds = %34
%38 = load i32, i32* %3
%39 = icmp sle i32 %38, 1114111
br i1 %39, label %40, label %41
40: ; preds = %37
store i32 4, i32* %5
store i32 240, i32* %6
br label %41
41: ; preds = %40, %37, %34
br label %42
42: ; preds = %41, %33
br label %43
43: ; preds = %42, %26
%44 = load i32, i32* %5
%45 = add nsw i32 %44, 1
%46 = call i8* @malloc(i32 %45)
store i8* %46, i8** %4
%47 = load i8*, i8** %4
%48 = load i32, i32* %5
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds i8, i8* %47, i64 %49
store i8 0, i8* %50
br label %51
51: ; preds = %80, %43
%52 = load i32, i32* %5
%53 = icmp sgt i32 %52, 0
br i1 %53, label %54, label %83
54: ; preds = %51
%55 = load i32, i32* %3
%56 = and i32 %55, 63
store i32 %56, i32* %7
%57 = load i32, i32* %5
%58 = add nsw i32 %57, -1
store i32 %58, i32* %5
%59 = load i32, i32* %5
%60 = icmp sgt i32 %59, 0
br i1 %60, label %61, label %71
61: ; preds = %54
%62 = load i32, i32* %7
%63 = trunc i32 %62 to i8
%64 = sext i8 %63 to i32
%65 = add nsw i32 %64, 128
%66 = trunc i32 %65 to i8
%67 = load i8*, i8** %4
%68 = load i32, i32* %5
%69 = sext i32 %68 to i64
%70 = getelementptr inbounds i8, i8* %67, i64 %69
store i8 %66, i8* %70
br label %80
71: ; preds = %54
%72 = load i32, i32* %7
%73 = trunc i32 %72 to i8
%74 = sext i8 %73 to i32
%75 = load i32, i32* %6
%76 = add nsw i32 %74, %75
%77 = trunc i32 %76 to i8
%78 = load i8*, i8** %4
%79 = getelementptr inbounds i8, i8* %78, i64 0
store i8 %77, i8* %79
br label %80
80: ; preds = %71, %61
%81 = load i32, i32* %3
%82 = ashr i32 %81, 6
store i32 %82, i32* %3
br label %51
83: ; preds = %51
%84 = load i8*, i8** %4
store i8* %84, i8** %2
br label %85
85: ; preds = %83, %11
%86 = load i8*, i8** %2
ret i8* %86
}

LLVM IR (-O2):
define noalias i8* @idris_utf8_fromChar(i32 %0) {
%2 = and i32 %0, 128
%3 = icmp eq i32 %2, 0
br i1 %3, label %4, label %8
4: ; preds = %1
%5 = tail call dereferenceable_or_null(2) i8* @malloc(i32 2)
%6 = trunc i32 %0 to i8
store i8 %6, i8* %5
%7 = getelementptr inbounds i8, i8* %5, i64 1
store i8 0, i8* %7
br label %67
8: ; preds = %1
%9 = add i32 %0, -128
%10 = icmp ult i32 %9, 1920
br i1 %10, label %19, label %11
11: ; preds = %8
%12 = add i32 %0, -2048
%13 = icmp ult i32 %12, 63488
br i1 %13, label %19, label %14
14: ; preds = %11
%15 = add i32 %0, -65536
%16 = icmp ult i32 %15, 1048576
%17 = select i1 %16, i32 4, i32 0
%18 = select i1 %16, i32 240, i32 0
br label %19
19: ; preds = %14, %11, %8
%20 = phi i32 [ 2, %8 ], [ 3, %11 ], [ %17, %14 ]
%21 = phi i32 [ 192, %8 ], [ 224, %11 ], [ %18, %14 ]
%22 = add nuw nsw i32 %20, 1
%23 = tail call i8* @malloc(i32 %22)
%24 = zext i32 %20 to i64
%25 = getelementptr inbounds i8, i8* %23, i64 %24
store i8 0, i8* %25
%26 = icmp eq i32 %20, 0
br i1 %26, label %67, label %27
27: ; preds = %19
%28 = and i32 %0, 63
%29 = add nsw i64 %24, -1
%30 = trunc i32 %28 to i8
%31 = or i8 %30, -128
%32 = getelementptr inbounds i8, i8* %23, i64 %29
store i8 %31, i8* %32
%33 = icmp eq i64 %29, 0
br i1 %33, label %67, label %38
34: ; preds = %58, %48, %38
%35 = phi i32 [ %40, %38 ], [ %50, %48 ], [ %60, %58 ]
%36 = add nuw nsw i32 %35, %21
%37 = trunc i32 %36 to i8
store i8 %37, i8* %23
br label %67
38: ; preds = %27
%39 = lshr i32 %0, 6
%40 = and i32 %39, 63
%41 = add nsw i64 %24, -2
%42 = icmp eq i64 %29, 1
br i1 %42, label %34, label %43
43: ; preds = %38
%44 = trunc i32 %40 to i8
%45 = or i8 %44, -128
%46 = getelementptr inbounds i8, i8* %23, i64 %41
store i8 %45, i8* %46
%47 = icmp eq i64 %41, 0
br i1 %47, label %67, label %48
48: ; preds = %43
%49 = lshr i32 %0, 12
%50 = and i32 %49, 63
%51 = add nsw i64 %24, -3
%52 = icmp eq i64 %41, 1
br i1 %52, label %34, label %53
53: ; preds = %48
%54 = trunc i32 %50 to i8
%55 = or i8 %54, -128
%56 = getelementptr inbounds i8, i8* %23, i64 %51
store i8 %55, i8* %56
%57 = icmp eq i64 %51, 0
br i1 %57, label %67, label %58
58: ; preds = %53
%59 = lshr i32 %0, 18
%60 = and i32 %59, 63
%61 = icmp eq i64 %51, 1
br i1 %61, label %34, label %62
62: ; preds = %58
%63 = add nsw i64 %24, -4
%64 = trunc i32 %60 to i8
%65 = or i8 %64, -128
%66 = getelementptr inbounds i8, i8* %23, i64 %63
store i8 %65, i8* %66
br label %67
67: ; preds = %27, %43, %53, %62, %34, %19, %4
%68 = phi i8* [ %5, %4 ], [ %23, %19 ], [ %23, %34 ], [ %23, %62 ], [ %23, %53 ], [ %23, %43 ], [ %23, %27 ]
ret i8* %68
}